mirror of
https://github.com/Klaus2m5/VTL02.git
synced 2024-11-24 16:34:00 +00:00
added error 247 - input buffer overlap
linbuf & progbuf might overlap when automatic statement expansion (N+1 -> N=N+1) is used excessively.
This commit is contained in:
parent
f8e18b96cd
commit
401fbd077b
10
vtl02sg.a65
10
vtl02sg.a65
@ -249,6 +249,7 @@
|
|||||||
; 244 value or variable missing after operator
|
; 244 value or variable missing after operator
|
||||||
; 245 missing closing parenthesis
|
; 245 missing closing parenthesis
|
||||||
; 246 out of memory (*-&)
|
; 246 out of memory (*-&)
|
||||||
|
; 247 overlap in input buffer, split program line
|
||||||
;
|
;
|
||||||
; internal changes:
|
; internal changes:
|
||||||
; added required atomic variable fetch & store.
|
; added required atomic variable fetch & store.
|
||||||
@ -1732,7 +1733,14 @@ syndbl:
|
|||||||
sta prgbuf,x
|
sta prgbuf,x
|
||||||
inx
|
inx
|
||||||
ldy arg+4 ; repeat variable & operator
|
ldy arg+4 ; repeat variable & operator
|
||||||
jmp syndbl1
|
tya
|
||||||
|
clc ; test buffer will not overlap
|
||||||
|
adc #$20
|
||||||
|
sta arg+4
|
||||||
|
cpx arg+4
|
||||||
|
bcc syndbl1
|
||||||
|
lda #$f7 ; buffers overlap error
|
||||||
|
jmp verr
|
||||||
|
|
||||||
synerr3:
|
synerr3:
|
||||||
lda #$f2 ; invalid or missing operator
|
lda #$f2 ; invalid or missing operator
|
||||||
|
Loading…
Reference in New Issue
Block a user