Commit 0eeb16a7 authored by Timothy E Baldwin's avatar Timothy E Baldwin Committed by ROOL
Browse files

Fix GSTrans of quoted macro variable

    *BASIC
    *SetMacro Macro Test
    SYS "OS_GSTrans", """<Macro>""", &10000, &100

Would result in an erroneous "String not recognised" error as the
end of macro variable was reached before closing quote.
Fix by reordering the checks.
parent 02e5e4dc
......@@ -699,14 +699,16 @@ GSREAD_AngleBraDaftSoIsnt
MOV R1, #"<"
B GSREAD_ReturnWithChar ; failed to get sensible variable
GSREAD_XPandGotToEnd
GSREAD_GotToEndCheckInString
TST R2, #GS_In_String ; got CR or LF
BNE GSREAD_BadStringError ; bad string
TST R2, #GS_Macroing
GSREAD_GotToAnEnd
ORREQ lr, lr, #C_bit ; got terminator
ExitSWIHandler EQ
ORR lr, lr, #C_bit ; got terminator
ExitSWIHandler
GSREAD_XPandGotToEnd
TST R2, #GS_Macroing
BEQ GSREAD_GotToEndCheckInString
; Nest out by one level
GSVarGetWSpace
LDRB R11, [R12, #GS_StackPtr]
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment