Hello, an interesting update. Using git I have no error on alpha/vm, it seems all those errors are gone away, just two of these:
in compiler/generic/primtype.lisp ; DOUBLE-DOUBLE-REG is not a defined storage class. ; COMPLEX-DOUBLE-DOUBLE-REG is not a defined storage class. but it seems those read errors are very annoying, cause I have ;;; Loading #P"/home/fausap/CMUCL/git-ver/cmucl/alpha-cross/compiler/alpha/macros.lbytef". Error in function LISP::FOP-EVAL-FOR-EFFECT: Attempt to load a file having a compile-time read error. [Condition of type SIMPLE-ERROR] Restarts: 0: [CONTINUE] Skip this form. 1: Return NIL from load of #P"target:compiler/alpha/macros". 2: Return NIL from load of "target:tools/comcom". 3: Return NIL from load of "cross.lisp". 4: [ABORT ] Return to Top-Level. Debug (type H for help) (LISP::FOP-EVAL-FOR-EFFECT) Source: ; File: target:code/load.lisp ; File has been modified since compilation: ; target:code/load.lisp ; Using form offset instead of character position. (EVAL (POP-STACK)) if I type 0, I can continue but I got several other errors... and it's useless. and I have a different "fatal" error in type-vops.lisp ; Compiling: /home/fausap/CMUCL/git-ver/cmucl/src/compiler/alpha/type-vops.lisp 2014-09-02 08:18:43 ; Comment: $Header: /home/fausap/CMUCL/git-ver/cmucl/src/compiler/alpha/type-vops.lisp a996127 2011-11-03 22:04:50 -0700 Raymond Toy $ Error in KERNEL::UNBOUND-SYMBOL-ERROR-HANDLER: the variable DYLAN-FUNCTION-HEADER-TYPE is unbound. Aborting... 2014-09-02 8:12 GMT+02:00 Fausto Saporito <[email protected]>: > Hello Raymond, > > I'll try with git sources. > Can I used 20d binaries ? > Maybe I should use Linux instead of NetBSD ... this could be better, > what do you think ? > > Before the "severe" error: DESCRIPTOR-REG is not a defined storage > class, I have some other minor issues related to external symbols > (that are not external in the ALPHA package). > How can I fix the external issue ? Is there a way to define them "not > external" ? > > I sent to the list a message with some logs... and it was awaiting > moderator approval because it was 200KB in size. > > But, it seems to me they are two different kind of errors: > > this is an excerpt of log about "external error": > > Start time: Monday, 9/1/14 11:52:41 am [-2], compiling > target:compiler/bit-util. > > ; Python version 1.1, VM version Intel x86/sse2 on 2014-09-01 11:52:41. > ; Compiling: /home/fausap/CMUCL/20d/src/compiler/bit-util.lisp > 2012-10-27 05:38:08 > > ; Comment: $Header: src/compiler/bit-util.lisp $ > ; > ; Error: Read error at 847: > ; "(do ((i vm:vector-data-offset/\ (1+ i))" > ; Reader error at 856 on #<Stream for file > "/home/fausap/CMUCL/20d/src/compiler/bit-util.lisp">: > ; The symbol "VECTOR-DATA-OFFSET" is not external in the ALPHA package. > ; > ; > ; Byte Compiling Top-Level Form: > ; > ; Error: Read error at 1184: > ; "(do ((i local-tn-limit (- i vm:word-bits/\))" > ; Reader error at 1187 on #<Stream for file > "/home/fausap/CMUCL/20d/src/compiler/bit-util.lisp">: > ; The symbol "WORD-BITS" is not external in the ALPHA package. > ; > ; > ; Converted SET-BIT-VECTOR. > ; Compiling DEFUN SET-BIT-VECTOR: > ; Converted BIT-VECTOR-REPLACE. > ; Compiling DEFUN BIT-VECTOR-REPLACE: > ; Converted BIT-VECTOR-COPY. > ; Compiling DEFUN BIT-VECTOR-COPY: > ; Byte Compiling Top-Level Form: > > ; target:compiler/bit-util.sse2f written. > ; Compilation finished in 0:00:00. > > it seems even if there some "read error", the compilation was ok. Correct ? > > When I got the other error (storage class), I have > > ; Compiling DEFMACRO DEFINE-STORAGE-CLASSES: > ; > ; Error: Read error at 6652: > ; "(catch-block control-stack :element-size vm:catch-block-size/\))" > ; Reader error at 6655 on #<Stream for file > "/home/fausap/CMUCL/20d/src/compiler/alpha/vm.lisp">: > ; The symbol "CATCH-BLOCK-SIZE" is not external in the ALPHA package. > ; > ; > ; Byte Compiling Top-Level Form: > ; Byte Compiling Top-Level Form: > ; Byte Compiling Top-Level Form: > ; Byte Compiling Top-Level Form: > ; Byte Compiling Top-Level Form: > ; Byte Compiling Top-Level Form: > ; Byte Compiling Top-Level Form: > ; Converted ALPHA-IMMEDIATE-CONSTANT-SC. > ; Compiling DEF-VM-SUPPORT-ROUTINE IMMEDIATE-CONSTANT-SC: > > > Error in function META-SC-OR-LOSE: > DESCRIPTOR-REG is not a defined storage class. > > Aborting... > 0: (DEBUG:BACKTRACE 536870911 > #<Stream for file > "/home/fausap/CMUCL/20d/alpha-cross/compile-compiler.log">) > 1: ("DEFUN COMF" #<SIMPLE-ERROR {49221BCD}>) > 2: (SIGNAL #<SIMPLE-ERROR {49221BCD}>) > 3: (ERROR "~S is not a defined storage class." DESCRIPTOR-REG) > 4: (META-SC-OR-LOSE DESCRIPTOR-REG) > 5: (META-SC-NUMBER-OR-LOSE DESCRIPTOR-REG) > 6: (EVAL > (C::DO-DEFCONSTANT-COMPILE-TIME 'REGISTER-ARG-SCN > (META-SC-NUMBER-OR-LOSE 'DESCRIPTOR-REG) > 'NIL)) > 7: (C::DO-EVAL-WHEN-STUFF (:COMPILE-TOPLEVEL) > ((C::DO-DEFCONSTANT-COMPILE-TIME 'REGISTER-ARG-SCN > # > 'NIL)) > #<Closure Over Function "DEFUN PROCESS-FORM" > {49221B71}> > T) > 8: (C::PROCESS-FORM > (EVAL-WHEN (:COMPILE-TOPLEVEL) > (C::DO-DEFCONSTANT-COMPILE-TIME 'REGISTER-ARG-SCN # 'NIL)) > ((PROGN > # > #) > C::ORIGINAL-SOURCE-START 0 62)) > 9: (C::PROCESS-FORM 2 > (EVAL-WHEN (:COMPILE-TOPLEVEL) > (C::DO-DEFCONSTANT-COMPILE-TIME 'REGISTER-ARG-SCN > # > 'NIL)) > ((PROGN > # > #) > C::ORIGINAL-SOURCE-START 0 62))[:EXTERNAL] > 10: (C::PROCESS-PROGN ((EVAL-WHEN # #) (EVAL-WHEN # # #)) > ((PROGN > # > #) > C::ORIGINAL-SOURCE-START 0 62)) > 11: (C::PROCESS-FORM > (PROGN > (EVAL-WHEN # #) > (EVAL-WHEN # # #)) > (C::ORIGINAL-SOURCE-START 0 62)) > 12: (C::PROCESS-FORM > (DEFCONSTANT REGISTER-ARG-SCN (META-SC-NUMBER-OR-LOSE 'DESCRIPTOR-REG)) > (C::ORIGINAL-SOURCE-START 0 62)) > 13: (C::PROCESS-FORM 2 > (DEFCONSTANT REGISTER-ARG-SCN > (META-SC-NUMBER-OR-LOSE 'DESCRIPTOR-REG)) > (C::ORIGINAL-SOURCE-START 0 62))[:EXTERNAL] > 14: (C::PROCESS-SOURCES #<Source-Info>) > 15: ((FLET #:G0 C::SUB-COMPILE-FILE)) > 16: (C::SUB-COMPILE-FILE #<Source-Info> NIL) > 17: (C::SUB-COMPILE-FILE 1 #<Source-Info> NIL)[:EXTERNAL] > 18: (COMPILE-FILE #P"target:compiler/alpha/vm.lisp" > :OUTPUT-FILE T > :ERROR-FILE ...) > 19: (COMMON-LISP-USER::COMF #P"target:compiler/alpha/vm") > 20: ((FLET #:G264 (FLET #:G216))) > 21: ((FLET #:G216)) > 22: ((FLET #:G216)) > 23: ("Top-Level Form")[:TOP-LEVEL] > 24: ("Top-Level Form")[:TOP-LEVEL] > 25: ("Top-Level Form")[:TOP-LEVEL] > 26: (LISP::SLOLOAD > #<Stream for file "/home/fausap/CMUCL/20d/src/tools/comcom.lisp">) > 27: (LISP::INTERNAL-LOAD #P"target:tools/comcom.lisp" > #P"/home/fausap/CMUCL/20d/src/tools/comcom.lisp" > :ERROR :SOURCE > ...) > 28: (LOAD "target:tools/comcom" :VERBOSE NIL :PRINT ...) > 29: (LISP::SLOLOAD #<Stream for file "/home/fausap/CMUCL/20d/cross.lisp">) > 30: (LISP::INTERNAL-LOAD #P"cross.lisp" > #P"/home/fausap/CMUCL/20d/cross.lisp" > :ERROR :SOURCE > ...) > 31: (LISP::INTERNAL-LOAD #P"cross.lisp" > #P"/home/fausap/CMUCL/20d/cross.lisp" > :ERROR NIL > ...) > 32: (LOAD "cross.lisp" :VERBOSE NIL :PRINT ...) > 33: (INTERACTIVE-EVAL (LOAD "cross.lisp")) > 34: (LISP::%TOP-LEVEL) > 35: ((LABELS LISP::RESTART-LISP SAVE-LISP)) > ; Compilation aborted after 0:00:00. _______________________________________________ cmucl-help mailing list [email protected] http://lists.zs64.net/mailman/listinfo/cmucl-help
