From 6cc307a2b2255fca249847c32466799bc402ca87 Mon Sep 17 00:00:00 2001 From: Matthew Hunt Date: Sun, 23 May 1999 20:45:08 +0000 Subject: =?UTF-8?q?Add=20patch=20by=20Andrew=20Plotkin=20and=20Torbj=C3=B6?= =?UTF-8?q?rn=20Andersson=20which=20allows=20this=20software=20to=20do=20s?= =?UTF-8?q?omething,=20instead=20of=20just=20segfaulting.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Obtained from: MASTER_SITE, but not in patch(1) form. --- games/inform/files/patch-ab | 38 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 38 insertions(+) create mode 100644 games/inform/files/patch-ab (limited to 'games/inform/files/patch-ab') diff --git a/games/inform/files/patch-ab b/games/inform/files/patch-ab new file mode 100644 index 000000000000..864a82e13aee --- /dev/null +++ b/games/inform/files/patch-ab @@ -0,0 +1,38 @@ +--- veneer.c.orig Sun May 23 13:23:38 1999 ++++ veneer.c Sun May 23 13:24:16 1999 +@@ -6,6 +6,12 @@ + /* Part of Inform 6.21 */ + /* copyright (c) Graham Nelson 1993, 1994, 1995, 1996, 1997, 1998, 1999 */ + /* */ ++/* Incorporates the patch by Andrew Plotkin/Torbörn Andersson which was */ ++/* posted on r.a.i.f. on 5 May 1999 by Michael Baum. This fixes a memory */ ++/* problem on some platforms and also fixes a bug which occurs when debug */ ++/* mode is off. Note that you have to turn off strict mode, i.e. -~S, to */ ++/* turn off the debug mode. */ ++/* */ + /* ------------------------------------------------------------------------- */ + + #include "header.h" +@@ -243,13 +249,18 @@ + @check_arg_count 7 ?~A__x;y++;@check_arg_count 8 ?~A__x;y++;.A__x;", + "#ifdef INFIX;if (obj has infix__watching) n=1;#endif;\ + #ifdef DEBUG;if (debug_flag & 1 ~= 0) n=1;#endif;\ +- if (n==1) { n=debug_flag & 1; debug_flag=debug_flag-n;\ +- print \"[ ~\", (name) obj, \"~.\", (property) id, \"(\";\ +- switch(y) { 1: print a; 2: print a,\",\",b; 3: print a,\",\",b,\",\",c;\ ++ if (n==1) {\ ++ #ifdef DEBUG;n=debug_flag & 1; ++debug_flag=debug_flag-n;#endif;\ ++ print \"[ ~\", (name) obj, \"~.\", (property) id, \"(\";\ ++ switch(y) { 1: print a; 2: print a,\",\",b; 3: print ++a,\",\",b,\",\",c;\ + 4: print a,\",\",b,\",\",c,\",\",d;\ + 5: print a,\",\",b,\",\",c,\",\",d,\",\",e;\ + 6: print a,\",\",b,\",\",c,\",\",d,\",\",e,\",\",f; }\ +- print \") ]^\"; debug_flag = debug_flag + n; }" ++ print \") ]^\";\ ++ #ifdef DEBUG;debug_flag = debug_flag + n;#endif;\ ++ }", + "if (id > 0 && id < 64)\ + { x = obj.&id; if (x==0) { x=$000a-->0 + 2*(id-1); n=2; }\ + else n = obj.#id; }\ -- cgit v1.2.3