[Openmcl-devel] Fwd: Freeze

Marko Tapio Manninen mmstud at gmail.com
Tue Jun 3 01:13:24 PDT 2008


Hi,

im getting error when trying to compile series package with ccl intel  
64bit. is it a bug or has my ccl broken in some point?

No MAKE-LOAD-FORM method is defined for #<CCL::SIMPLE-PROGRAM-ERROR  
#x3000410DCFED>
    [Condition of type SIMPLE-ERROR]

Backtrace:
   0: (CCL::NO-MAKE-LOAD-FORM-FOR #<CCL::SIMPLE-PROGRAM-ERROR  
#x3000410DCFED>)
       Locals:
         CCL::OBJECT = #<CCL::SIMPLE-PROGRAM-ERROR #x3000410DCFED>
   1: (CCL::FASL-SCAN-USER-FORM #<CCL::SIMPLE-PROGRAM-ERROR  
#x3000410DCFED>)
       [No Locals]
   2: (CCL::FASL-SCAN-CLFUN #<Anonymous Function #x3000410DCF5F>)
       Locals:
         CCL::F = #<Anonymous Function #x3000410DCF5F>
         CCL::NCODE-WORDS = 9
   3: (CCL::FASL-SCAN-CLFUN #<Anonymous Function #x3000410DBFBF>)
       Locals:
         CCL::F = #<Anonymous Function #x3000410DBFBF>
         CCL::NCODE-WORDS = 18
   4: (CCL::FASL-SCAN '((23 83) (47 "home:lisp;libs;series;s- 
code.lisp.newest")
        (4 #<Anonymous Function #x300040F8F47F>)
        (41 SERIES:*SUPPRESS-SERIES-WARNINGS* NIL
         "Suppress warnings when the restrictions are violated.")
        (41 SERIES:*SERIES-EXPRESSION-CACHE* T
         "Avoids multiple expansions")
        (41 SERIES:*LAST-SERIES-LOOP* NIL
         "Loop most recently created by SERIES.")
        (41 SERIES:*LAST-SERIES-ERROR* NIL
         "Info about error found most recently by SERIES.") ..))))
   5: (CCL::FASL-SCAN-FORMS-AND-DUMP-FILE '((23 83) (47  
"home:lisp;libs;series;s-code.lisp.newest")
        (4 #<Anonymous Function #x300040F8F47F>)
        (41 SERIES:*SUPPRESS-SERIES-WARNINGS* NIL
         "Suppress warnings when the restrictions are violated.")
        (41 SERIES:*SERIES-EXPRESSION-CACHE* T
         "Avoids multiple expansions")
        (41 SERIES:*LAST-SERIES-LOOP* NIL
         "Loop most recently created by SERIES.")
        (41 SERIES:*LAST-SERIES-ERROR* NIL
         "Info about error found most recently by SERIES.") ..))) "/ 
Users/mmstud/lisp/libs/series/s-code.dx64fsl" #<LEXICAL-ENVIRONMENT   
#x300040F8F9AD>)
   6: (CCL::%COMPILE-FILE "/Users/mmstud/lisp/libs/series/s-code.lisp"  
"/Users/mmstud/lisp/libs/series/s-code.dx64fsl" 'T 'NIL 'NIL 'NIL 'T  
'T 'NIL 'NIL #<BACKEND DARWINX8664 #x30004071783D> ':DEFAULT)
       Locals:
         CCL::SRC = "/Users/mmstud/lisp/libs/series/s-code.lisp"
         CCL::VERBOSE = T
         PRINT = NIL
         LOAD = NIL
         CCL::FEATURES = NIL
         CCL::SAVE-LOCAL-SYMBOLS = T
         CCL::SAVE-DOC-STRINGS = T
         CCL::SAVE-DEFINITIONS = NIL
         CCL::FORCE = NIL
         EXTERNAL-FORMAT = :DEFAULT
         CCL::OUTPUT-DEFAULT-TYPE = #P".dx64fsl"
         CCL::*FASL-NON-STYLE-WARNINGS-SIGNALLED-P* = NIL
         CCL::*FASL-WARNINGS-SIGNALLED-P* = NIL
         *FEATURES* = (:SERIES-ANSI :ASDF-INSTALL :ASDF :PRIMARY- 
CLASSES :COMMON-LISP :OPENMCL ...)
         CCL::*FASL-DEFERRED-WARNINGS* = NIL
         *FASL-SAVE-LOCAL-SYMBOLS* = T
         *FASL-SAVE-DOC-STRINGS* = T
         *FASL-SAVE-DEFINITIONS* = NIL
         CCL::*FCOMP-WARNINGS-HEADER* = #<Unbound>
         *COMPILE-FILE-PATHNAME* = NIL
         *COMPILE-FILE-TRUENAME* = NIL
         *PACKAGE* = #<Package "COMMON-LISP-USER">
         *READTABLE* = #<READTABLE  #x30004047C7DD>
         *COMPILE-PRINT* = NIL
         *COMPILE-VERBOSE* = T
         CCL::*FASL-TARGET* = :DARWINX8664
         CCL::*FASL-BACKEND* = #<BACKEND DARWINX8664 #x30004071783D>
         CCL::*FASL-TARGET-BIG-ENDIAN* = NIL
         CCL::*TARGET-FTD* = #S(CCL::FOREIGN-TYPE-DATA :TRANSLATORS  
#<HASH-TABLE :TEST EQ size 16/60 #x300040A5F07D> :KIND-INFO #<HASH- 
TABLE :TEST EQ size 29/60 #x300040A5EA9D> :DEFINITIONS ...)
         CCL::DEFENV = #<DEFINITION-ENVIRONMENT  #x300040F8F9FD>
         CCL::LEXENV = #<LEXICAL-ENVIRONMENT  #x300040F8F9AD>
         CCL::*FCOMP-EXTERNAL-FORMAT* = :DEFAULT
         CCL::FORMS = ((23 83) (47 "home:lisp;libs;series;s- 
code.lisp.newest") (4 #<Anonymous Function #x300040F8F47F>) (41  
SERIES:*SUPPRESS-SERIES-WARNINGS* NIL "Suppress warnings when the  
restrictions are violated.") (41 SERIES:*SERIES-EXPRESSION-CACHE* T  
"Avoids multiple expansions") (41 SERIES:*LAST-SERIES-LOOP* NIL "Loop  
most recently created by SERIES.") ...)
   7: (COMPILE-FILE #P"/Users/mmstud/lisp/libs/series/s-code.lisp"  
':OUTPUT-FILE #P"/Users/mmstud/lisp/libs/series/s-code.dx64fsl"  
':VERBOSE 'T ':PRINT 'NIL ':LOAD 'NIL ':FEATURES 'NIL ':TARGET  
':DARWINX8664 ':SAVE-LOCAL-SYMBOLS 'NIL ':SAVE-DOC-STRINGS 'T ':SAVE- 
DEFINITIONS 'T ':EXTERNAL-FORMAT 'NIL ':FORCE ':DEFAULT)
       Locals:
         CCL::SRC = #P"/Users/mmstud/lisp/libs/series/s-code.lisp"
         CCL::OUTPUT-FILE = #P"/Users/mmstud/lisp/libs/series/s- 
code.dx64fsl"
         CCL::VERBOSE = T
         PRINT = NIL
         LOAD = NIL
         CCL::FEATURES = NIL
         CCL::TARGET = :DARWINX8664
         CCL::TARGET-P = NIL
         CCL::SAVE-LOCAL-SYMBOLS = T
         CCL::SAVE-DOC-STRINGS = T
         CCL::SAVE-DEFINITIONS = NIL
         EXTERNAL-FORMAT = :DEFAULT
         CCL::FORCE = NIL
         CCL::BACKEND = #<BACKEND DARWINX8664 #x30004071783D>
         CCL::%RESTARTS% = ((#<RESTART ASDF:RETRY #x229B53D> #<RESTART  
ASDF:ACCEPT #x229B58D>) (#<RESTART ABORT #x229B94D>) (#<RESTART ABORT- 
BREAK #x229BB0D> #<RESTART ABORT #x229BB5D>))
       Catch-tags:
         (:RESTART CCL::RETRY-COMPILE-FILE)
   8: (#<STANDARD-METHOD ASDF:PERFORM (ASDF:COMPILE-OP
                                      ASDF:CL-SOURCE-FILE)> #<COMPILE- 
OP NIL #x300040F8995D> #<CL-SOURCE-FILE "s-code" #x300040F8699D>)
       Locals:
         ASDF:SOURCE-FILE = #P"/Users/mmstud/lisp/libs/series/s- 
code.lisp"
         ASDF::OUTPUT-FILE = #P"/Users/mmstud/lisp/libs/series/s- 
code.dx64fsl"
   9: (CCL::%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE '(NIL
        #<STANDARD-METHOD ASDF:PERFORM (ASDF:COMPILE-OP
                                        ASDF:CL-SOURCE-FILE)>
        . 4265217))
       Locals:
         CCL::METHODS = ((#<STANDARD-METHOD ASDF:PERFORM :BEFORE  
(ASDF:COMPILE-OP ASDF:SOURCE-FILE)>) (#<STANDARD-METHOD  
ASDF:PERFORM :AFTER (ASDF:OPERATION ASDF:COMPONENT)>) #<STANDARD- 
METHOD ASDF:PERFORM (ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE)>)
         CCL::BEFORES = (#<STANDARD-METHOD ASDF:PERFORM :BEFORE  
(ASDF:COMPILE-OP ASDF:SOURCE-FILE)>)
         CCL::CDR-METHS = ((#<STANDARD-METHOD ASDF:PERFORM :AFTER  
(ASDF:OPERATION ASDF:COMPONENT)>) #<STANDARD-METHOD ASDF:PERFORM  
(ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE)>)
         CCL::PRIMARIES = (#<STANDARD-METHOD ASDF:PERFORM  
(ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE)>)
         CCL::AFTERS = (#<STANDARD-METHOD ASDF:PERFORM :AFTER  
(ASDF:OPERATION ASDF:COMPONENT)>)
         CDR = NIL
         METHOD-FUNCTION = #<METHOD-FUNCTION ASDF:PERFORM  
(ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE)>
  10: (CCL::%%STANDARD-COMBINED-METHOD-DCODE '((#<STANDARD-METHOD  
ASDF:PERFORM :BEFORE (ASDF:COMPILE-OP
                                                 ASDF:SOURCE-FILE)>)
        (#<STANDARD-METHOD ASDF:PERFORM :AFTER (ASDF:OPERATION
                                                ASDF:COMPONENT)>)
        #<STANDARD-METHOD ASDF:PERFORM (ASDF:COMPILE-OP
                                        ASDF:CL-SOURCE-FILE)>) 4265217)
       Locals:
         CCL::CELL-2 = (#<STANDARD-METHOD ASDF:PERFORM (ASDF:COMPILE- 
OP ASDF:CL-SOURCE-FILE)> . 4265217)
  11: (ASDF:OPERATE 'ASDF:LOAD-OP ':SERIES)
       Locals:
         ASDF::OPERATION-CLASS = ASDF:LOAD-OP
         ASDF:SYSTEM = :SERIES
         ASDF::VERBOSE = T
         ASDF:VERSION = NIL
         ASDF::ARGS = NIL
         ASDF::OP = #<LOAD-OP NIL #x300040F899CD>
         ASDF::*VERBOSE-OUT* = NIL
         ASDF:SYSTEM = #<SYSTEM "series" #x300040F87B0D>
         ASDF::STEPS = ((#2=#<COMPILE-OP NIL #x300040F8995D> . #1= .  
#<CL-SOURCE-FILE "s-package" #x300040F8707D>) (#<LOAD-OP NIL  
#x300040F898BD> . #1#) (#2# . #3= . #<CL-SOURCE-FILE "s-code"  
#x300040F8699D>) (#2# . #5= . #<SYSTEM "series" #x300040F87B0D>)  
(#4=#<LOAD-OP NIL #x300040F899CD> . #3#) (#4# . #5#))
         CCL::*OUTSTANDING-DEFERRED-WARNINGS* = NIL
         ASDF::OP = #<COMPILE-OP NIL #x300040F8995D>
         ASDF:COMPONENT = #<CL-SOURCE-FILE "s-code" #x300040F8699D>
         #:LOOP-LIST-401 = ((#<COMPILE-OP NIL #x300040F8995D> . #2= .  
#<SYSTEM "series" #x300040F87B0D>) (#1=#<LOAD-OP NIL #x300040F899CD> .  
#<CL-SOURCE-FILE "s-code" #x300040F8699D>) (#1# . #2#))
         CCL::%RESTARTS% = ((#<RESTART ABORT #x229B94D>) (#<RESTART  
ABORT-BREAK #x229BB0D> #<RESTART ABORT #x229BB5D>))
       Catch-tags:
         (:RESTART ASDF:RETRY)
  12: (CCL::CALL-CHECK-REGS 'ASDF:OOS 'ASDF:LOAD-OP ':SERIES)
       Locals:
         CCL::FN = ASDF:OOS
         CCL::ARGS = (ASDF:LOAD-OP :SERIES)
         CCL::OLD-REGS = (#<STRING-INPUT-STREAM  #x300040F89C2D>  
(ASDF:OOS 'ASDF:LOAD-OP :SERIES) - NIL)
  13: (SWANK::EVAL-REGION "(asdf:oos 'asdf:load-op :series)
      ")
  14: ((:INTERNAL SWANK::REPL-EVAL))
  15: (SWANK::TRACK-PACKAGE #<COMPILED-LEXICAL-CLOSURE (:INTERNAL
                                  SWANK::REPL-EVAL) #x300040F89C5F>)
  16: (SWANK::CALL-WITH-BUFFER-SYNTAX #<COMPILED-LEXICAL-CLOSURE  
(:INTERNAL
                                  SWANK::REPL-EVAL) #x300040F89C9F>)
  17: (SWANK::REPL-EVAL "(asdf:oos 'asdf:load-op :series)
      ")
  18: (CCL::CALL-CHECK-REGS 'SWANK:LISTENER-EVAL "(asdf:oos 'asdf:load- 
op :series)
      ")
  19: ((:INTERNAL SWANK::EVAL-FOR-EMACS))
  20: (#<Anonymous Function #x300040DA6E9F> #<Compiled-function  
SWANK:SWANK-DEBUGGER-HOOK #x300040E96C2F> #<COMPILED-LEXICAL-CLOSURE  
(:INTERNAL
                                  SWANK::EVAL-FOR-EMACS)  
#x300040F89CEF>)
  21: (FUNCALL 'SWANK::EVAL-FOR-EMACS '(SWANK:LISTENER-EVAL
         "(asdf:oos 'asdf:load-op :series)
      ") "COMMON-LISP-USER" 17)
  22: ((:INTERNAL SWANK::HANDLE-REQUEST))
  23: (#<Anonymous Function #x300040DA6E9F> #<Compiled-function  
SWANK:SWANK-DEBUGGER-HOOK #x300040E96C2F> #<Compiled-function (:INTERNAL
                           SWANK::HANDLE-REQUEST) (Non-Global)   
#x300040E81E4F>)
  24: (SWANK::CALL-WITH-REDIRECTED-IO #<CONNECTION  #x300040EDE09D>  
#<COMPILED-LEXICAL-CLOSURE (:INTERNAL
                                  SWANK::CALL-WITH-CONNECTION)  
#x300040F89D3F>)
  25: (SWANK::CALL-WITH-CONNECTION #<CONNECTION  #x300040EDE09D>  
#<Compiled-function (:INTERNAL
                           SWANK::HANDLE-REQUEST) (Non-Global)   
#x300040E81E4F>)
  26: (SWANK::HANDLE-REQUEST #<CONNECTION  #x300040EDE09D>)
       Locals:
         SWANK::CONNECTION = #<CONNECTION  #x300040EDE09D>
         SWANK::*SWANK-STATE-STACK* = NIL
  27: (SWANK::REPL-LOOP #<CONNECTION  #x300040EDE09D>)
       [No Locals]
  28: (SWANK::CALL-WITH-BINDINGS 'NIL #<COMPILED-LEXICAL-CLOSURE  
(:INTERNAL
                                  SWANK::SPAWN-REPL-THREAD)  
#x300040EF645F>)
       Locals:
         SWANK::ALIST = NIL
         SWANK::FUN = #<COMPILED-LEXICAL-CLOSURE (:INTERNAL  
SWANK::SPAWN-REPL-THREAD) #x300040EF645F>
         SWANK::RLIST = NIL
         SWANK::VARS = NIL
       Catch-tags:
         NIL
  29: (CCL::RUN-PROCESS-INITIAL-FORM #<PROCESS repl-thread(5) [Active]  
#x300040ECC26D> '(#<COMPILED-LEXICAL-CLOSURE (:INTERNAL
                                    CCL::%PROCESS-RUN-FUNCTION)  
#x300040ECC1DF>))
       Locals:
         CCL::INITIAL-FORM = (#<COMPILED-LEXICAL-CLOSURE (:INTERNAL  
CCL::%PROCESS-RUN-FUNCTION) #x300040ECC1DF>)
         CCL::EXITED = NIL
         #:G59185 = (PROCESS-RESET)
         CCL::%HANDLERS% = NIL
         #:ABORT = #<RESTART ABORT #x229BB5D>
         #:ABORT-BREAK = #<RESTART ABORT-BREAK #x229BB0D>
         CCL::%RESTARTS% = NIL
       Catch-tags:
         (:RESTART ABORT-BREAK)
         NIL
  30: ((:INTERNAL CCL::%PROCESS-PRESET-INTERNAL) #<PROCESS repl- 
thread(5) [Active] #x300040ECC26D> '(#<COMPILED-LEXICAL-CLOSURE  
(:INTERNAL
                                    CCL::%PROCESS-RUN-FUNCTION)  
#x300040ECC1DF>))
       Locals:
         CCL::INITIAL-FORM = (#<COMPILED-LEXICAL-CLOSURE (:INTERNAL  
CCL::%PROCESS-RUN-FUNCTION) #x300040ECC1DF>)
         *CURRENT-PROCESS* = #<PROCESS Initial(0) [Active]  
#x300040434EAD>
         CCL::SYMS = (CCL::*FREE-XPS* CCL::*FREE-CIRCULARITY-HASH- 
TABLES* CCL::*VINSN-VARPARTS* CCL::*VINSN-LABEL-FREELIST* CCL::*VINSN- 
FREELIST* CCL::*LCELL-FREELIST* ...)
         VALUES = (NIL NIL #<POOL  #x300040EF686D> #<POOL   
#x300040EF683D> #<POOL  #x300040EF680D> #<POOL  #x300040EF67DD> ...)
       Catch-tags:
         NIL
  31: ((:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION))




More information about the Openmcl-devel mailing list