... | ... |
@@ -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 |