"Keith M. Corbett" <[email protected]> writes: > Maybe you are missing one or more CL library dependencies? I had to > install these CL libraries to get Weblocks + CLSQL to work in SBCL and > CCL.
No, my problem was LispWorks specific. Stephen Compall supplied a patch which fixed the problem. The unpatched version ran fine under SBCL. Nico > anaphora-0.9.3 > asdf-system-connections > cl-cont > cl-containers > cl-json > closer-mop > cl-prevalence > fare-matcher > fare-utils > f-underscore > metabang-bind > metatilities > metatilities-base > moptilities > parenscript > > Most of these are available via clbuild and/or common-lisp.net. > > -Keith > > > On May 19, 7:48 am, Nico de Jager <[email protected]> wrote: >> Hi >> >> I am using Weblocks (stable) with CLSQL on LispWorks Professional >> 5.1.2. Trying to load clsql-fluid (from the git repository) fails, >> though (see ** LispWorks error & backtrace below). >> >> I have almost no MOP knowledge (yet), but I can duplicate LispWorks' >> error in >> SBCL with the following (see * SBCL error & backtrace below), which >> gives a better description of the error. >> >> I need to use LispWorks, though. How can I fix this (or can someone >> fix >> it). >> >> Thanks. >> Nico >> >> * SBCL error & backtrace: >> >> CL-USER> (defclass foo () >> ()) >> #<STANDARD-CLASS FOO> >> CL-USER> (defclass bar (standard-class) >> ()) >> #<STANDARD-CLASS BAR> >> CL-USER> (defclass baz (foo) >> () >> (:metaclass bar)) >> >> The class #<STANDARD-CLASS FOO> was specified as a super-class >> of the class #<BAR BAZ>, but the meta-classes >> #<STANDARD-CLASS STANDARD-CLASS> and #<STANDARD-CLASS BAR> are >> incompatible. Define a method for SB-MOP:VALIDATE-SUPERCLASS to >> avoid this error. >> [Condition of type SIMPLE-ERROR] >> >> Restarts: >> 0: [RETRY] Retry SLIME REPL evaluation request. >> 1: [ABORT] Return to SLIME's top level. >> 2: [TERMINATE-THREAD] Terminate this thread (#<THREAD "repl-thread" >> RUNNING {1002E2A1E1}>) >> >> Backtrace: >> 0: ((SB-PCL::FAST-METHOD SHARED-INITIALIZE :AFTER (SB-PCL::STD-CLASS >> T)) #(17 NIL 5 NIL) #<unavailable argument> #<BAR BAZ> T)[:EXTERNAL] >> 1: ((LAMBDA (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0. >> SB-PCL::.ARG1. SB-INT:&MORE SB-PCL::.DFUN-MORE-CONTEXT. SB-PCL::.DFUN- >> MORE-COUNT.)) ..) >> 2: ((SB-PCL::FAST-METHOD MAKE-INSTANCE (CLASS)) #<unavailable >> argument> #<unavailable argument> #<STANDARD-CLASS BAR>)[:EXTERNAL] >> 3: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK)) >> 4: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-RECURSIVE-LOCK]509)) >> 5: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK ..) >> 6: ((SB-PCL::FAST-METHOD SB-MOP:ENSURE-CLASS-USING-CLASS (NULL T)) >> #<unavailable argument> #<unavailable argument> NIL BAZ)[:EXTERNAL] >> 7: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-RECURSIVE-LOCK]509)) >> 8: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK ..) >> 9: (SB-MOP:ENSURE-CLASS BAZ)[:EXTERNAL] >> 10: (SB-PCL::REAL-LOAD-DEFCLASS BAZ BAR (FOO) NIL NIL NIL NIL NIL #S >> (SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING NIL :TOPLEVEL-FORM-NUMBER >> NIL :PLIST NIL) NIL) >> 11: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SB-PCL::LOAD-DEFCLASS 'BAZ 'BAR >> '(FOO) (LIST) (LIST) ...) #<NULL-LEXENV>) >> 12: (SB-INT:SIMPLE-EVAL-IN-LEXENV ..) >> 13: (SB-INT:SIMPLE-EVAL-IN-LEXENV ..) >> 14: (SB-INT:SIMPLE-EVAL-IN-LEXENV (DEFCLASS BAZ (FOO) NIL (:METACLASS >> BAR)) #<NULL-LEXENV>) >> >> ** LispWorks error & backtrace: >> >> CL-USER 4 > (asdf :clsql-fluid) >> ;;; Compiling file /home/nico/devel/cl/asdf_install_dir/site/clsql/sql/ >> fluid.lisp ... >> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0 >> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3 >> ;;; Source level debugging is on >> ;;; Source file recording is on >> ;;; Cross referencing is on >> ; (TOP-LEVEL-FORM 0) >> ; (TOP-LEVEL-FORM 1) >> ; (DEFPACKAGE "CLSQL-FLUID-BT") >> ; (TOP-LEVEL-FORM 3) >> ; (SUBFUNCTION (DEFSETF CLSQL-FLUID-BT::FLUID-GC-COUNT) (DEFSTRUCT >> CLSQL-FLUID-BT::FLUID)) >> ; (SUBFUNCTION (DEFSETF CLSQL-FLUID-BT:FLUID-LOCK) (DEFSTRUCT CLSQL- >> FLUID-BT::FLUID)) >> ; (SUBFUNCTION CLSQL-FLUID-BT:MAKE-FLUID (DEFSTRUCT CLSQL-FLUID- >> BT::FLUID)) >> ; CLSQL-FLUID-BT:FLUID-VALUE >> ; CLSQL-FLUID-BT::FLUID-GC >> ; (SETF CLSQL-FLUID-BT:FLUID-VALUE) >> ; (TOP-LEVEL-FORM 8) >> ; (TOP-LEVEL-FORM 9) >> ; (TOP-LEVEL-FORM 10) >> ; (DEFCLASS CLSQL-SYS::SUB-DB-FORWARDING-CLASS) >> ; (METHOD VALIDATE-SUPERCLASS (CLSQL-SYS::SUB-DB-FORWARDING-CLASS T)) >> ; (METHOD CLOS:SLOT-VALUE-USING-CLASS (CLSQL-SYS::SUB-DB-FORWARDING- >> CLASS T T)) >> ; (METHOD (SETF CLOS:SLOT-VALUE-USING-CLASS) (T CLSQL-SYS::SUB-DB- >> FORWARDING-CLASS T T)) >> ; (METHOD CLOS:SLOT-BOUNDP-USING-CLASS (CLSQL-SYS::SUB-DB-FORWARDING- >> CLASS T T)) >> ; (METHOD CLOS:SLOT-MAKUNBOUND-USING-CLASS (CLSQL-SYS::SUB-DB- >> FORWARDING-CLASS T T)) >> >> **++++ Error in (DEFCLASS CLSQL-SYS:FLUID-DATABASE): >> #<STANDARD-CLASS DATABASE 217B30A3> is an invalid superclass of >> #<SUB-DB-FORWARDING-CLASS FLUID-DATABASE 22149AE7>. >> ;;;*** Warning in (METHOD INITIALIZE-INSTANCE :AFTER (CLSQL-SYS:FLUID- >> DATABASE)): Ignoring type declaration with illegal type CLSQL- >> SYS:FLUID-DATABASE >> ; (METHOD INITIALIZE-INSTANCE :AFTER (CLSQL-SYS:FLUID-DATABASE)) >> ; CLSQL-SYS::MAKE-FLUID-DATABASE-FLUID >> ; CLSQL-SYS::FLUID-SUB-DATABASE >> ; CLSQL-SYS::DEFINE-FLUID-FORWARD >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-TYPE (CLSQL-SYS:FLUID- >> DATABASE)): Ignoring type declaration with illegal type CLSQL- >> SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-TYPE (CLSQL-SYS:FLUID-DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-QUERY (T CLSQL-SYS:FLUID- >> DATABASE T T)): Ignoring type declaration with illegal type CLSQL- >> SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-QUERY (T CLSQL-SYS:FLUID-DATABASE T T)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-EXECUTE-COMMAND (T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-EXECUTE-COMMAND (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-QUERY-RESULT-SET (T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-QUERY-RESULT-SET (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-DUMP-RESULT-SET (T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-DUMP-RESULT-SET (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-STORE-NEXT-ROW (T CLSQL- >> SYS:FLUID-DATABASE T)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-STORE-NEXT-ROW (T CLSQL-SYS:FLUID- >> DATABASE T)) >> ;;;*** Warning in (METHOD CLSQL-SYS::DATABASE-TRUNCATE (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS::DATABASE-TRUNCATE (CLSQL-SYS:FLUID-DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-CREATE-SEQUENCE (T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-CREATE-SEQUENCE (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-DROP-SEQUENCE (T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-DROP-SEQUENCE (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-SEQUENCE-NEXT (T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-SEQUENCE-NEXT (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-LIST-SEQUENCES (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-LIST-SEQUENCES (CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-SET-SEQUENCE-POSITION (T >> T CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-SET-SEQUENCE-POSITION (T T CLSQL- >> SYS:FLUID-DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-SEQUENCE-LAST (T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-SEQUENCE-LAST (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS::DATABASE-START-TRANSACTION (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS::DATABASE-START-TRANSACTION (CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS::DATABASE-COMMIT-TRANSACTION >> (CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS::DATABASE-COMMIT-TRANSACTION (CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS::DATABASE-ABORT-TRANSACTION (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS::DATABASE-ABORT-TRANSACTION (CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-LIST-TABLES (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-LIST-TABLES (CLSQL-SYS:FLUID-DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-LIST-TABLES-AND-SEQUENCES >> (CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-LIST-TABLES-AND-SEQUENCES (CLSQL- >> SYS:FLUID-DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-LIST-VIEWS (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-LIST-VIEWS (CLSQL-SYS:FLUID-DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-LIST-INDEXES (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-LIST-INDEXES (CLSQL-SYS:FLUID-DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-LIST-TABLE-INDEXES (T >> CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-LIST-TABLE-INDEXES (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-LIST-ATTRIBUTES (T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-LIST-ATTRIBUTES (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-ATTRIBUTE-TYPE (T T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-ATTRIBUTE-TYPE (T T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS::DATABASE-ADD-ATTRIBUTE (T T CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS::DATABASE-ADD-ATTRIBUTE (T T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS::DATABASE-RENAME-ATTRIBUTE (T T T >> CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS::DATABASE-RENAME-ATTRIBUTE (T T T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-UNDERLYING-TYPE (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-UNDERLYING-TYPE (CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-CREATE-LARGE-OBJECT >> (CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-CREATE-LARGE-OBJECT (CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-WRITE-LARGE-OBJECT (T T >> CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-WRITE-LARGE-OBJECT (T T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-READ-LARGE-OBJECT (T >> CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-READ-LARGE-OBJECT (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-DELETE-LARGE-OBJECT (T >> CLSQL-SYS:FLUID-DATABASE)): Ignoring type declaration with illegal >> type CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-DELETE-LARGE-OBJECT (T CLSQL-SYS:FLUID- >> DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-PREPARE (T T CLSQL- >> SYS:FLUID-DATABASE T T)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-PREPARE (T T CLSQL-SYS:FLUID-DATABASE T >> T)) >> ; (METHOD CLSQL-SYS:DATABASE-TYPE-LIBRARY-LOADED ((EQL :FLUID))) >> ; (METHOD CLSQL-SYS:DATABASE-TYPE-LOAD-FOREIGN ((EQL :FLUID))) >> ; (METHOD CLSQL-SYS:DATABASE-INITIALIZE-DATABASE-TYPE ((EQL :FLUID))) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-DISCONNECT (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-DISCONNECT (CLSQL-SYS:FLUID-DATABASE)) >> ;;;*** Warning in (METHOD CLSQL-SYS:DATABASE-RECONNECT (CLSQL- >> SYS:FLUID-DATABASE)): Ignoring type declaration with illegal type >> CLSQL-SYS:FLUID-DATABASE >> ; (METHOD CLSQL-SYS:DATABASE-RECONNECT (CLSQL-SYS:FLUID-DATABASE)) >> ; (TOP-LEVEL-FORM 0) >> ; *** 1 error detected, no fasl file produced. >> Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL >> 2180E873> on #<ASDF:CL-SOURCE-FILE "fluid" 2186C523>. >> Warning: COMPILE-FILE failed while performing #<ASDF:COMPILE-OP NIL >> 2180E873> on #<ASDF:CL-SOURCE-FILE "fluid" 2186C523>. >> Error: erred while invoking #<ASDF:COMPILE-OP NIL 2180E873> on >> #<ASDF:CL-SOURCE-FILE "fluid" 2186C523> >> 1 (continue) Try recompiling fluid >> 2 Retry performing #<ASDF:COMPILE-OP NIL 2180E873> on #<ASDF:CL- >> SOURCE-FILE "fluid" 2186C523>. >> 3 Continue, treating #<ASDF:COMPILE-OP NIL 2180E873> on #<ASDF:CL- >> SOURCE-FILE "fluid" 2186C523> as having been successful. >> 4 (abort) Return to level 0. >> 5 Return to top loop level 0. >> >> Type :b for backtrace, :c <option number> to proceed, or :? for other >> options >> >> CL-USER 5 : 1 > :b >> Call to CLOS::METHOD-COMBINATION-TEMPLATE >> Call to CLOS::NEXT-METHOD-CALL-2 >> Call to (METHOD ASDF:PERFORM ASDF:AROUND (ASDF:COMPILE-OP ASDF:CL- >> SOURCE-FILE)) >> Call to CLOS::METHOD-COMBINATION-TEMPLATE >> Call to (SUBFUNCTION 1 ASDF:OPERATE) >> Call to ASDF:OPERATE >> Call to ASDF:OOS >> Interpreted call to ASDF >> Call to EVAL >> Call to CAPI::CAPI-TOP-LEVEL-FUNCTION >> Call to CAPI::INTERACTIVE-PANE-TOP-LOOP >> Call to (SUBFUNCTION MP::PROCESS-SG-FUNCTION MP::INITIALIZE-PROCESS- >> STACK) >> >> CL-USER 6 : 1 > --~--~---------~--~----~------------~-------~--~----~ You received this message because you are subscribed to the Google Groups "weblocks" group. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [email protected] For more options, visit this group at http://groups.google.com/group/weblocks?hl=en -~----------~----~----~----~------~----~------~--~---
