[cmucl-help] CMUCL 18c building on tru64 5.1
Fausto Saporito
fausto.saporito at gmail.com
Tue Sep 2 06:12:37 UTC 2014
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.
More information about the cmucl-help
mailing list