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

Reply via email to