Hi Nico, to continue with the compilation, you need just to evaluate the DEFVAR form. In the source it should have been surrounded by an EVAL-WHEN, but I hadn't found the time to learn the GIT-client to send a patch.
Regards Plamen On Mar 27, 12:13 pm, Nico de Jager <[email protected]> wrote: > Hi > > I don't know if this has been fixed yet, but I had to move > > (defvar *registered-webapps* nil > "A list of applications that the system knows about") > > in application.lisp to application-mop.lisp in order to compile > Weblocks stable on LispWorks Pro 5.1.2 and ACL 8.1. (Below is the > compiler output and backtrace from LispWorks). > > Many thanks to all the contributors. > Nico > > ..... > ..... > ;;; Compiling file /home/nico/devel/cl/asdf_install_dir/site/weblocks- > stable/src/application-mop.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) > ; (TOP-LEVEL-FORM 2) > ; (DEFCLASS WEBLOCKS::WEBAPP-CLASS) > ; (METHOD VALIDATE-SUPERCLASS (WEBLOCKS::WEBAPP-CLASS CLOSER- > MOP:STANDARD-CLASS)) > ; (METHOD SHARED-INITIALIZE :AFTER (WEBLOCKS::WEBAPP-CLASS T)) > ; (TOP-LEVEL-FORM 0) > ; Loading fasl file /home/nico/devel/cl/asdf_install_dir/site/weblocks- > stable/src/application-mop.ufasl > ;;; Compiling file /home/nico/devel/cl/asdf_install_dir/site/weblocks- > stable/src/application.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) > ; (TOP-LEVEL-FORM 2) > ; (DEFVAR WEBLOCKS::*REGISTERED-WEBAPPS*) > > **++++ Error in (DEFCLASS WEBLOCKS::WEBLOCKS-WEBAPP): > The variable *REGISTERED-WEBAPPS* is unbound. > ;;;*** Warning in (METHOD (SETF WEBLOCKS::WEBLOCKS-WEBAPP-PREFIX) (T > WEBLOCKS::WEBLOCKS-WEBAPP)): Ignoring type declaration with illegal > type WEBLOCKS::WEBLOCKS-WEBAPP > ; (METHOD (SETF WEBLOCKS::WEBLOCKS-WEBAPP-PREFIX) (T > WEBLOCKS::WEBLOCKS-WEBAPP)) > ;;;*** Warning in (METHOD (SETF WEBLOCKS::WEBLOCKS-WEBAPP-PUBLIC-FILES- > URI-PREFIX) (T WEBLOCKS::WEBLOCKS-WEBAPP)): Ignoring type declaration > with illegal type WEBLOCKS::WEBLOCKS-WEBAPP > ; (METHOD (SETF WEBLOCKS::WEBLOCKS-WEBAPP-PUBLIC-FILES-URI-PREFIX) (T > WEBLOCKS::WEBLOCKS-WEBAPP)) > ;;;*** Warning in (METHOD (SETF WEBLOCKS::WEBLOCKS-WEBAPP-PUBLIC-FILES- > PATH) (T WEBLOCKS::WEBLOCKS-WEBAPP)): Ignoring type declaration with > illegal type WEBLOCKS::WEBLOCKS-WEBAPP > ; (METHOD (SETF WEBLOCKS::WEBLOCKS-WEBAPP-PUBLIC-FILES-PATH) (T > WEBLOCKS::WEBLOCKS-WEBAPP)) > ; WEBLOCKS::DEFWEBAPP > ;;;*** Warning in (METHOD INITIALIZE-INSTANCE :AFTER > (WEBLOCKS::WEBLOCKS-WEBAPP)): Ignoring type declaration with illegal > type WEBLOCKS::WEBLOCKS-WEBAPP > ; (METHOD INITIALIZE-INSTANCE :AFTER (WEBLOCKS::WEBLOCKS-WEBAPP)) > ; WEBLOCKS::GET-WEBAPP > ; WEBLOCKS::GET-WEBAPPS-FOR-CLASS > ; WEBLOCKS::CHECK-WEBAPP > ; WEBLOCKS::START-WEBAPP > ; WEBLOCKS::SORT-WEBAPPS > ; WEBLOCKS::ENABLE-WEBAPP > ; (TOP-LEVEL-FORM 16) > ; (DEFGENERIC WEBLOCKS::INITIALIZE-WEBAPP) > ; (TOP-LEVEL-FORM 16) > ;;;*** Warning in (METHOD WEBLOCKS::INITIALIZE-WEBAPP :BEFORE > (WEBLOCKS::WEBLOCKS-WEBAPP)): Ignoring type declaration with illegal > type WEBLOCKS::WEBLOCKS-WEBAPP > ; (METHOD WEBLOCKS::INITIALIZE-WEBAPP :BEFORE (WEBLOCKS::WEBLOCKS- > WEBAPP)) > ; WEBLOCKS::STOP-WEBAPP > ; (TOP-LEVEL-FORM 19) > ; (DEFGENERIC WEBLOCKS::FINALIZE-WEBAPP) > ; (TOP-LEVEL-FORM 19) > ;;;*** Warning in (METHOD WEBLOCKS::FINALIZE-WEBAPP :AFTER > (WEBLOCKS::WEBLOCKS-WEBAPP)): Ignoring type declaration with illegal > type WEBLOCKS::WEBLOCKS-WEBAPP > ; (METHOD WEBLOCKS::FINALIZE-WEBAPP :AFTER (WEBLOCKS::WEBLOCKS- > WEBAPP)) > ; WEBLOCKS::FIND-APP > ; WEBLOCKS::RESTART-WEBAPP > ; WEBLOCKS::MAKE-WEBAPP-URI > ; WEBLOCKS::MAKE-WEBAPP-PUBLIC-FILE-URI > ;;;*** Warning in WEBLOCKS::WEBAPP-SESSION-VALUE: WEBLOCKS::*CURRENT- > WEBAPP* assumed special > ; WEBLOCKS::WEBAPP-SESSION-VALUE > ;;;*** Warning in (SETF WEBLOCKS::WEBAPP-SESSION-VALUE): > WEBLOCKS::*CURRENT-WEBAPP* assumed special > ; (SETF WEBLOCKS::WEBAPP-SESSION-VALUE) > ; (DEFVAR WEBLOCKS::*WEBAPP-PERMANENT-ACTIONS*) > ; WEBLOCKS::WEBAPP-PERMANENT-ACTION > ; WEBLOCKS::WEBAPP-PERMANENT-ACTIONS > ; WEBLOCKS::ADD-WEBAPP-PERMANENT-ACTION > ; WEBLOCKS::REMOVE-WEBAPP-PERMANENT-ACTION > ; WEBLOCKS::DEFINE-PERMANENT-ACTION > ; WEBLOCKS::DEFINE-PERMANENT-ACTION/CC > ; (TOP-LEVEL-FORM 34) > ; (TOP-LEVEL-FORM 35) > ; (DEFGENERIC WEBLOCKS::COMPUTE-WEBAPP-PUBLIC-FILES-URI-PREFIX) > ; (TOP-LEVEL-FORM 35) > ; WEBLOCKS::COMPUTE-WEBAPP-PUBLIC-FILES-URI-PREFIX-UTIL > ; (DEFVAR WEBLOCKS::*CURRENT-WEBAPP*) > ; (TOP-LEVEL-FORM 38) > ; WEBLOCKS::CURRENT-WEBAPP > ; WEBLOCKS::RESET-WEBAPP-SESSION > ; WEBLOCKS::WEBAPP-APPLICATION-DEPENDENCIES > ; WEBLOCKS::WEBAPP-NAME > ; WEBLOCKS::WEBAPP-DESCRIPTION > ; WEBLOCKS::WEBAPP-SERVES-HOSTNAME > ; WEBLOCKS::WEBAPP-HOSTNAMES > ; WEBLOCKS::WEBAPP-PREFIX > ; WEBLOCKS::WEBAPP-PUBLIC-FILES-URI-PREFIX > ; WEBLOCKS::WEBAPP-PUBLIC-FILES-PATH > ; WEBLOCKS::WEBAPP-INIT-USER-SESSION > ; (TOP-LEVEL-FORM 0) > ; *** 1 error detected, no fasl file produced. > Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL > 21DC645F> on #<ASDF:CL-SOURCE-FILE "application" 21DAC787>. > Warning: COMPILE-FILE failed while performing #<ASDF:COMPILE-OP NIL > 21DC645F> on #<ASDF:CL-SOURCE-FILE "application" 21DAC787>. > Error: erred while invoking #<ASDF:COMPILE-OP NIL 21DC645F> on > #<ASDF:CL-SOURCE-FILE "application" 21DAC787> > 1 (continue) Try recompiling application > 2 Retry performing #<ASDF:COMPILE-OP NIL 21DC645F> on #<ASDF:CL- > SOURCE-FILE "application" 21DAC787>. > 3 Continue, treating #<ASDF:COMPILE-OP NIL 21DC645F> on #<ASDF:CL- > SOURCE-FILE "application" 21DAC787> 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 3 : 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 4 : 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 -~----------~----~----~----~------~----~------~--~---
