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.
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 -~----------~----~----~----~------~----~------~--~---
