Browse code

(asma) Auto-start at 0x100.

Andrew Alderwick authored on 14/01/2023 19:46:54
Showing 1 changed files
... ...
@@ -196,9 +196,9 @@
196 196
 @asma-init-next-pass ( -- )
197 197
 	;asma/pass LDA INC ;asma/pass STA
198 198
 	;asma-write-buffer ;asma-output/ptr STA2
199
-	#0100 DUP DUP2 ( 0100 00 0000 )
200
-		;asma/addr STA2
199
+	#0100 DUP2 DUP ( 0100 0100 00 )
201 200
 		;asma/state STA
201
+		;asma/addr STA2
202 202
 		;asma/written-addr STA2
203 203
 	;&preamble-end ;&preamble SUB2k ;asma-assemble-chunk JSR2 POP2 POP2
204 204
 	JMP2r