Null-terminate default BF-CODE.

2017-03-22 23:29:05 -06:00 · 2017-03-22 23:29:05 -06:00 · c73e9af127
parent 93303a4b6e
commit c73e9af127
1 changed files with 1 additions and 1 deletions
--- a/WOPO.COB
+++ b/WOPO.COB
@ -117,7 +117,7 @@
               VALUE "$NUL$".
           03 BF-CODE PIC X(999)
               VALUE "++++++++++(>++++++(>++++<-)<-)>>.<<+++++(>++++(>--
-      -              "--<-)<-)>>-.<+++(>---<-)>.-.$$".
+      -              "--<-)<-)>>-.<+++(>---<-)>.-.$NUL$".
           03 BF-OUTPUT PIC X(999)
               VALUE SPACES.
           03 CYCLE-LIMIT PIC 9(5)