diff --git a/BF-RUN.COB b/BF-RUN.COB index 5fac386..c4f407c 100644 --- a/BF-RUN.COB +++ b/BF-RUN.COB @@ -88,7 +88,8 @@ UNSTRING BF-CODE DELIMITED BY "$" INTO COBOL-STRING 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 ELSE IF LSQB THEN MOVE "(" TO CURRENT-INSTRUCTION