*** empty log message ***
[h316.git] / programs / tools / src / binal.asm
index 87de4f5e050e45c153ceb46a5a2771b1243f39b3..b93caff6c1f4bc63e1b26e465863345955674380 100644 (file)
 *       
 ************************************************************************
 *
-       SUBR    LSTART,BO3S     BEGINNING OF THIRD STAGE LOADER
+       SUBR    BINAL,ANF
+       SUBR    LSTART,BO3S     BEGINNING OF THIRD STAGE LOADER 
 *
        REL             RELOCATABLE MODE
        ORG     0
 *
-       STA     STRT    SAVE AUTO START LOCATION
+ANF    STA     STRT    SAVE AUTO START LOCATION
        CRA
        HLT             
        STA     ALOC    FIRST LOCATION TO PUNCH
@@ -390,7 +391,7 @@ SWRD        DAC     **
 B2AD   DAC     BO2S    START ADDRESS OF SECOND STAGE LOADER
 B3AD   DAC     BO3S    START ADDRESS OF THIRD STAGE LOADER
 *
-LDRL   DEC     100     LEADER LENGTH
+LDRL   DEC     300     LEADER LENGTH
 SZE    SZE             INSTRUCTION FOR FILL IN
 SNZ    SNZ             INSTRUCTION FOR FILL IN
 *