[clisp-list] Re: Building CLISP on Windows fails

[Sam S. <sd...@gn...>]

> * Frank Buss <so@senax-ohff.qr> [2005-12-26 00:28:55 +0100]:
>
> (DOCUMENTATION (LAMBDA NIL 'BAZONK) 'FUNCTION)
>
> *** - handle_fault error2 ! address = 0x40c2804 not in
> [0x19d70000,0x19fa369c) !
> SIGSEGV cannot be cured. Fault address = 0x40c2804.
> Permanently allocated: 87648 bytes.
> Currently in use: 5343600 bytes.
> Free space: 41247 bytes.
> make[1]: *** [tests] Error 5
> make[1]: Leaving directory `/clisp-2.36/clisp-gui/tests'
> make: *** [check-tests] Error 2
>
>
>
> I've tried the same (without debug option) again on my PC and it crashes at
> another position:
>
> EQL-OK: ERROR
> (LET ((V '(A B C)) (VAL '(3 2 1))) (PROGV V VAL (MAPCAR #'EVAL V)))
> EQUAL-OK: (3 2 1)
> (DEFUN PLUS (&REST ARGS) (APPLY #'+ ARGS))
> EQL-OK: PLUS
> (FLET ((PLUS (A B) (+ A B)) (MINUS (A B) (- A B))) (LIST (PLUS 1 2) (MINUS 1
> 2)))
> EQUAL-OK: (3 -1)
> (LIST (FLET ((PLUS (A B) (- A B))) (PLUS 3 2)) (+ 3 2))
> EQUAL-OK: (1 5)
> (FLET ((PLUS (A B) (PLUS (PLUS A B A) B))) (PLUS 3 2))
> EQL-OK: 10
> (LABELS ((QUEUE (L) (IF (CAR L) (QUEUE (CDR L)) 'ENDE))) (QUEUE '(1 2 3)))
> EQL-OK: ENDE
> (LABELS ((PLUS (A B) (* A (PLUS A A B)))) (PLUS 1 2 3))
> [SIMPLE-PROGRAM-ERROR]: 
> *** - handle_fault error2 ! address = 0x19087ee0 not in
> [0x19d70000,0x19fa46b8) !
> SIGSEGV cannot be cured. Fault address = 0x19087ee0.
> Permanently allocated: 87648 bytes.
> Currently in use: 5354016 bytes.
> Free space: 48548 bytes.
> make[1]: *** [tests] Error 5
> make[1]: Leaving directory `/clisp-2.36/clisp-gui/tests'
> make: *** [check-tests] Error 2

one possibility is that I use
gcc (GCC) 3.4.4 (cygming special) (gdc 0.12, using dmd 0.125)
on cygwin, while you might have a gcc4 on mingw - and that might have
bugs.


-- 
Sam Steingold (http://www.podval.org/~sds) running w2k
http://www.memri.org/ http://www.savegushkatif.org
http://www.openvotingconsortium.org/ http://www.iris.org.il
Can I do it in Lisp, or would you rather wait an extra couple of months?