Fixed lexical analysis of DATA
This commit is contained in:
1 parent
bf56aa6852
commit
4e8a802fc1
3 files changed
+3
-2
No files matched your search
Binary file not shown.
Binary file not shown.
+3
-2
@@ -12,6 +12,7 @@
|
|||||||
;VERSION 3.0, 01-03-1987
|
;VERSION 3.0, 01-03-1987
|
||||||
;VERSION 5.0, 31-05-2024
|
;VERSION 5.0, 31-05-2024
|
||||||
;VERSION 5.1, 10-08-2024
|
;VERSION 5.1, 10-08-2024
|
||||||
|
;VERSION 5.2, 16-02-2025
|
||||||
;
|
;
|
||||||
EXTRN XEQ
|
EXTRN XEQ
|
||||||
EXTRN RUN0
|
EXTRN RUN0
|
||||||
@@ -2107,14 +2108,14 @@ LEXAN7: CP '*'
|
|||||||
JR Z,LEXAN9
|
JR Z,LEXAN9
|
||||||
OR A
|
OR A
|
||||||
CALL P,LEX ;TOKENISE IF POSS.
|
CALL P,LEX ;TOKENISE IF POSS.
|
||||||
|
CP TDATA
|
||||||
|
JR Z,LEXAN9
|
||||||
CP TOKLO
|
CP TOKLO
|
||||||
JR C,LEXAN8
|
JR C,LEXAN8
|
||||||
CP TOKHI+1
|
CP TOKHI+1
|
||||||
JR NC,LEXAN8
|
JR NC,LEXAN8
|
||||||
ADD A,OFFSET ;LEFT VERSION
|
ADD A,OFFSET ;LEFT VERSION
|
||||||
LEXAN8: CP TREM
|
LEXAN8: CP TREM
|
||||||
JR Z,LEXAN9
|
|
||||||
CP TDATA
|
|
||||||
JR NZ,LEXANA
|
JR NZ,LEXANA
|
||||||
LEXAN9: SET 6,C ;QUIT TOKENISING
|
LEXAN9: SET 6,C ;QUIT TOKENISING
|
||||||
LEXANA: CP TFN
|
LEXANA: CP TFN
|
||||||
|
|||||||
Reference in new issue
Block a user