X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=programs%2Ftools%2Fsrc%2Fbinal.asm;h=b93caff6c1f4bc63e1b26e465863345955674380;hb=61655ba39f55913eaea68404e36e3c104b30b813;hp=87de4f5e050e45c153ceb46a5a2771b1243f39b3;hpb=2dbecc757e86084187009049d87a8df03317eea7;p=h316.git

diff --git a/programs/tools/src/binal.asm b/programs/tools/src/binal.asm
index 87de4f5..b93caff 100644
--- a/programs/tools/src/binal.asm
+++ b/programs/tools/src/binal.asm
@@ -102,12 +102,13 @@
 *       
 ************************************************************************
 *
-	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
 *