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 {