Fix go-away in interfunge.i

diff --git a/NEWS.txt b/NEWS.txt
index 65051fdbddd71d20907cbb2de2d94ba4d2a502af..26172dad15e68d0863f4afde9753e05bb9b701a0 100644 (file)
--- a/NEWS.txt
+++ b/NEWS.txt
@@ -138,6 +138,8 @@ Changes by Alex Smith
     library for use with C-INTERCAL (see README.txt or the Revamped Manual for
     information on this). Also added a test program for this to the pit.
 
+25. Fixed some bugs in the go-away command in interfunge.i.
+
   Release 0.28 (by Alex Smith) 1 Apr 2008
 
 Patches, suggestions and bugs found by Joris Huizer

diff --git a/pit/interfunge.i b/pit/interfunge.i
index 986e80c05ef2ce4576d3e41d7f580ba95fe6ea25..fc1090dff2e03dcc2f7ee270f3e935facbfaed4b 100644 (file)
--- a/pit/interfunge.i
+++ b/pit/interfunge.i
@@ -488,14 +488,15 @@
 (290)  PLEASE DO (280) NEXT
        DO FORGET #80
        DON'T IMPLEMENT GO AWAY HERE
-       DO 50% DO (291) NEXT
+       PLEASE NOTE THAT THIS WAS PATCHED BY AIS523 TO FIX A SYNTAX ERROR
+       DO %50 (291) NEXT
        DO .13 <- #0
        DO .12 <- #65535
-       DO 50% .12 <- .12~#1
+       DO %50 .12 <- .12~#1
        PLEASE DO (20) NEXT
 (291)  DO .12 <- #0
        DO .13 <- #65535
-       DO 50% .13 <- .13~#1
+       DO %50 .13 <- .13~#1
        PLEASE DO (20) NEXT
 (300)  PLEASE DO (290) NEXT
        PLEASE GIVE UP