[Ecls-list] ecl on alpha-netbsd1.6.1

[Prut Flut]

Hello all,

ecl (patch-current-exp, Jan 14, 16:56) still does not
build on alpha/netbsd but I wanted to add what information
I have: ecl_min boots (I get the message "...core
initialized") and gets stuck in defpackage.lsp.  It appears
that this is because of the loop macro: if I replace
loop2.lsp in src/lsp/load.lsp with loop.lsp, I get up to
starting to load clos.lsp, then ecl_min hangs.  Below,
you will find three small patches to shut up the compiler
about 3 warnings (these were the easy ones, there are a
lot about mismatched pointer type, but I do not know
enough to attempt to fix them).  If I have time, I will
try to configure ecl with the old-loop...

Yours respectfully,

Philippe Crama

--- ecl-0.9c/src/c/file.d       Thu Jan 15 13:53:13 2004
+++ file.d      Thu Jan 15 13:48:07 2004
@@ -24,6 +24,7 @@
 #include <ecl.h>
 #include "ecl-inl.h"
 #include "internal.h"
+#include <string.h>
 
 #ifdef HAVE_SELECT
 #include <sys/select.h>
--- ecl-0.9c/src/c/instance.d   Thu Jan 15 13:53:13 2004
+++ instance.d  Thu Jan 15 13:48:07 2004
@@ -14,6 +14,7 @@
 */
 
 #include "ecl.h"
+#include <string.h>
 
 cl_object
 ecl_allocate_instance(cl_object clas, int size)
--- ecl-0.9c/src/c/hash.d       Thu Jan 15 13:53:13 2004
+++ hash.d      Thu Jan 15 13:48:07 2004
@@ -621,7 +621,7 @@
 cl_sxhash(cl_object key)
 {
        cl_index output = _hash_equal(~(cl_hashkey)0, 0, key);
-       const cl_index mask = (1 << (FIXNUM_BITS - 3)) - 1;
+       const cl_index mask = (((cl_index) 1) << (FIXNUM_BITS - 3)) - 1;
        @(return MAKE_FIXNUM(output & mask))
 }
 
=============================================
Output of ecl_min (I have put :verbose t in load.lsp, note that
loop.lsp is loaded instead of loop2.lsp, otherwise, the last loaded
file would be defpackage.lsp (that uses loop))

cd build; gmake
gmake[1]: Entering directory `/www/p/pcrama/ecls-track/ecl-0.9c/build'
if [ -f CROSS-COMPILER ]; then \
        ./CROSS-COMPILER < compile.lsp; \
else \
        ./ecl_min < compile.lsp; \
fi
;*** Lisp core booted ****
ECLS (Embeddable Common Lisp)  16384 pages

> ;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/export.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/defmacro.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/helpfile.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/evalmacros.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/module.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/autoload.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/describe.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/setf.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/predlib.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/arraylib.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/assert.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/defstruct.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/iolib.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/listlib.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/mislib.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/numlib.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/packlib.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/seq.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/seqlib.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/trace.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/ansi.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/loop.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/defpackage.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/ffi.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/build/lsp/config.lsp"
;;; Loading "/www/p/pcrama/ecls-track/ecl-0.9c/src/lsp/top.lsp"
;;; Loading "clos/load.lsp"

Unrecoverable error: 
Lisp initialization error.

Abort trap - core dumped
gmake[1]: *** [ecl] Error 134
gmake[1]: Leaving directory `/www/p/pcrama/ecls-track/ecl-0.9c/build'
gmake: *** [all] Error 2