chiark / gitweb /
algol68-fringe.a68: Empty row displays are apparently not allowed.
authorMark Wooding <mdw@distorted.org.uk>
Mon, 1 Apr 2013 15:25:29 +0000 (16:25 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Mon, 1 Apr 2013 15:48:12 +0000 (16:48 +0100)
So supply a useless thing.

algol68-fringe.a68

index 38be75a4b33963d2b87dd7ba4279afcbb59b1a54..b04ee273306c2d69a7adcfe987c3bdd5882b65e1 100644 (file)
@@ -22,7 +22,7 @@ PROC fail = ([] CHAR message) VOID:
   ### Mournfully announce an error and quit.
   #
   BEGIN put(stand error, (program name, ": ", message, new line));
-    execve("/bin/false", "false", ())  # Can this be any worse? #
+    execve("/bin/false", "false", "die=now")   # Can this be any worse? #
   END;
 
 ###--------------------------------------------------------------------------