From 16506d6c034ab63cce1cf4d4067b1b466925aa17 Mon Sep 17 00:00:00 2001 From: Alex Smith Date: Sat, 5 Jul 2008 15:06:07 -0400 Subject: [PATCH] Fix COME FROM in multiple input files --- NEWS.txt | 4 ++++ src/perpet.c | 8 ++++---- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/NEWS.txt b/NEWS.txt index f6ffd24..940c280 100644 --- a/NEWS.txt +++ b/NEWS.txt @@ -128,6 +128,10 @@ Changes by Alex Smith nasty typos (two of the worst were specifying variables as IGNORED by default, and stating that select acts like OR in TriIntercal!). +23. Fixed a bug in the external calls system that made it impossible to write + a COME FROM in more than one file at a time whilst still having the + resulting program work reliably. + Release 0.28 (by Alex Smith) 1 Apr 2008 Patches, suggestions and bugs found by Joris Huizer diff --git a/src/perpet.c b/src/perpet.c index 5f59bd7..8b439b3 100644 --- a/src/perpet.c +++ b/src/perpet.c @@ -1580,10 +1580,10 @@ int main(int argc, char *argv[]) C-INTERCAL preprocessor (that handles WHILE); that isn't a problem because external calls are inconsistent with multithreading anyway. */ - long ppnum1=65538L*2L; - long ppnum2=65538L*2L; - long ppnum3=65538L*2L; - long ppnum6=65538L*2L; + static long ppnum1=65538L*2L; + static long ppnum2=65538L*2L; + static long ppnum3=65538L*2L; + static long ppnum6=65538L*2L; long ciopos=0L; /*@+charintliteral@*/ /* literal chars are ints */ while(inchar != EOF) -- 2.43.0