This patch is also for 64 bit users.

patch-0.5.patch (text/plain), 945 bytes, created by Adam Peacock on 2004-12-19 05:50:20 UTC

diff -u /tmp/curry-0.9.8/runtime/heap.nw ./runtime/heap.nw
--- /tmp/curry-0.9.8/runtime/heap.nw	Sat Dec 18 08:27:50 2004
+++ ./runtime/heap.nw	Sat Dec 18 08:28:16 2004
@@ -189,7 +189,7 @@
 };
 
 #define closure_argc(node)	(node_size(node) - closure_node_size(0))
-#define closure_node_size(argc)	(wordsof(struct closure_node) + ((argc)-1))
+#define closure_node_size(argc)	(wordsof(struct closure_node) + (argc) - 1)
 
 @
 Vectors differ from tuples in that the size of a vector cannot be
diff -u /tmp/curry-0.9.8/runtime/heap.h ./runtime/heap.h
--- /tmp/curry-0.9.8/runtime/heap.h	Sat Dec 18 08:31:12 2004
+++ ./runtime/heap.h	Sat Dec 18 08:29:04 2004
@@ -96,7 +96,7 @@
 };
 
 #define closure_argc(node)	(node_size(node) - closure_node_size(0))
-#define closure_node_size(argc)	(wordsof(struct closure_node) + ((argc)-1))
+#define closure_node_size(argc)	(wordsof(struct closure_node) + (argc) - 1)
 
 #line 202 "heap.nw"
 struct vector_node {