X-Git-Url: https://git.distorted.org.uk/~mdw/fringe/blobdiff_plain/226de6c60bf985dbec6ef025f3759b7d1795655d..b4ccf28fdae8b63e4c2abc154e8bba1ec8ace6ab:/algol68-fringe.a68 diff --git a/algol68-fringe.a68 b/algol68-fringe.a68 index b096a4b..b04ee27 100644 --- a/algol68-fringe.a68 +++ b/algol68-fringe.a68 @@ -1,4 +1,4 @@ -COMMENT -*-algol-68-*- +COMMENT -*-a68-*- Algol 68 implementation of a `same-fringe' solver. @@ -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; ###--------------------------------------------------------------------------