Add null-terminated code support to BF-RUN.COB
This commit is contained in:
parent
19a3a94686
commit
c0313d8f42
|
@ -88,7 +88,8 @@
|
||||||
UNSTRING BF-CODE DELIMITED BY "$"
|
UNSTRING BF-CODE DELIMITED BY "$"
|
||||||
INTO COBOL-STRING
|
INTO COBOL-STRING
|
||||||
WITH POINTER IP
|
WITH POINTER IP
|
||||||
IF COBOL-STRING IS EQUAL TO SPACES THEN
|
IF COBOL-STRING IS EQUAL TO SPACES OR
|
||||||
|
COBOL-STRING IS EQUAL TO "NUL" THEN
|
||||||
MOVE "$" TO CURRENT-INSTRUCTION
|
MOVE "$" TO CURRENT-INSTRUCTION
|
||||||
ELSE IF LSQB THEN
|
ELSE IF LSQB THEN
|
||||||
MOVE "(" TO CURRENT-INSTRUCTION
|
MOVE "(" TO CURRENT-INSTRUCTION
|
||||||
|
|
Loading…
Reference in New Issue