The diff needed to build miniPicoLisp for Windows. Surprisingly small.
Maybe the Makefile and source could be changed so it would build with no
changes in Mingw.
Just FYI, I thought it was pretty cool.

(This is not a Cygwin build, but native Windows!)

regards,
Jakob



--- miniPicoLisp/src/Makefile   2009-01-11 13:17:37.000000000 +0100
+++ miniPicoLisp-win/src/Makefile       2010-09-01 12:36:28.975639416 +0200
@@ -10,7 +10,7 @@
 
 .c.o:
        echo $*.c:
-       gcc -c -O2 -pipe \
+       i586-mingw32msvc-gcc -c -O2  \
        -falign-functions -fomit-frame-pointer -fno-strict-aliasing \
        -W -Wimplicit -Wreturn-type -Wunused -Wformat \
        -Wuninitialized -Wstrict-prototypes \
@@ -21,8 +21,8 @@
 $(bin)/picolisp: $(picoFiles:.c=.o)
        mkdir -p $(bin)
        echo "  " link picolisp:
-       gcc -o $(bin)/picolisp $(picoFiles:.c=.o) -lc -lm
-       strip $(bin)/picolisp
+       i586-mingw32msvc-gcc -o $(bin)/picolisp.exe $(picoFiles:.c=.o)  -lm
+       i586-mingw32msvc-strip $(bin)/picolisp.exe
 
 
 # Clean up
diff -ru miniPicoLisp/src/math.c miniPicoLisp-win/src/math.c
--- miniPicoLisp/src/math.c     2008-09-04 08:23:14.000000000 +0200
+++ miniPicoLisp-win/src/math.c 2010-09-01 12:34:25.136613423 +0200
@@ -462,7 +462,7 @@
        return box(r);
 }
 
-static u_int64_t Seed;
+static uint64_t Seed;
 #define hi(t)     (word)((t) >> 32)
 
 // (seed 'num) -> num
diff -ru miniPicoLisp/src/pico.h miniPicoLisp-win/src/pico.h
--- miniPicoLisp/src/pico.h     2010-08-02 11:38:40.000000000 +0200
+++ miniPicoLisp-win/src/pico.h 2010-09-01 12:32:54.579642921 +0200
@@ -9,6 +9,8 @@
 #include <string.h>
 #include <errno.h>
 #include <setjmp.h>
+#include <stdint.h>
+
 
 #define WORD ((int)sizeof(long))
 #define BITS (8*WORD)


-- 
UNSUBSCRIBE: mailto:picol...@software-lab.de?subject=unsubscribe

Reply via email to