Work around a compiler bug in Unix spigot

hoglet67 · Jan 24, 2022 · 70bb4f8 · 70bb4f8
1 parent 2c8d0f0
commit 70bb4f8
Showing 1 changed file with 9 additions and 3 deletions.
diff --git a/src/v7/spigot.c b/src/v7/spigot.c
@@ -9,11 +9,16 @@ outnl();
 print();
 
 
-program() {
-
 #ifdef LINUX
+outc(c)
+char c;
+{
+   putchar(c);
+}
+main() {
 short r[N + 1];
 #else
+program() {
 short *r = (short *)0x1FFE;
 #endif
 
@@ -40,8 +45,9 @@ short *r = (short *)0x1FFE;
          printf("%04x %04x\n", 0x0FFE + 2 * x, r[x]);
       }
 #endif
-      print(c + d/10000);
+      i = d/10000 + c;
       c = d%10000;
+      print(i);
    }
    outnl();
 }