Improving portability. It is no longer assumed that pointers

can be converted to a type long and vice versa. The configure
script tries to detect the appropriate type to use. Also,
some run-time checking is performed in the streams module
to detect which conversions specifier strings to use for
printing numbers.

1 files changed, 2 insertions, 1 deletions

diff --git a/gc.c b/gc.c
index 0de0c3f2..ec192a9e 100644
--- a/gc.c
+++ b/gc.c
@@ -31,6 +31,7 @@
 #include <setjmp.h>
 #include <dirent.h>
 #include <wchar.h>
+#include "config.h"
 #include "lib.h"
 #include "stream.h"
 #include "hash.h"
@@ -231,7 +232,7 @@ tail_call:
     {
       val alloc_size = obj->v.vec[-2];
       val fill_ptr = obj->v.vec[-1];
-      long i, fp = c_num(fill_ptr);
+      cnum i, fp = c_num(fill_ptr);
 
       mark_obj(alloc_size);
       mark_obj(fill_ptr);