Hi, Zach
Sorry, I checked again, it's just a style-warning, ASDF actually won't stop the building process:
* (compile-file "warning")
; compiling file "/Users/binghe/Lisp/src/warning.lisp" (written 20 MAR 2011 09:27:10 AM): ; compiling (IN-PACKAGE :CL-USER) ; compiling (DEFCLASS A-CLASS ...) ; compiling (DEFCLASS A-SUBCLASS ...) ; file: /Users/binghe/Lisp/src/warning.lisp ; in: DEFCLASS A-CLASS ; (DEFCLASS A-CLASS NIL ((SLOT :TYPE A-SUBCLASS))) ; --> PROGN EVAL-WHEN ; ==> ; (LET () ; (SB-PCL::LOAD-DEFCLASS 'A-CLASS 'STANDARD-CLASS 'NIL ; (LIST ; (LIST* :NAME 'SLOT :READERS 'NIL :WRITERS 'NIL ; :INITARGS 'NIL 'SB-PCL::TYPE-CHECK-FUNCTION ; (SB-INT:NAMED-LAMBDA # ; # ; # ; SB-PCL::VALUE) ; '(:TYPE A-SUBCLASS))) ; (LIST :DIRECT-DEFAULT-INITARGS NIL) 'NIL 'NIL ; '(SLOT) (SB-C:SOURCE-LOCATION) 'NIL)) ; ; caught STYLE-WARNING: ; undefined type: A-SUBCLASS ; ; compilation unit finished ; Undefined type: ; A-SUBCLASS ; caught 1 STYLE-WARNING condition
; /Users/binghe/Lisp/src/warning.fasl written ; compilation finished in 0:00:00.017 #P"/Users/binghe/Lisp/src/warning.fasl" T NIL
But I still want to change the order to make it better in SBCL:
* (compile-file "warning")
; compiling file "/Users/binghe/Lisp/src/warning.lisp" (written 20 MAR 2011 09:29:21 AM): ; compiling (IN-PACKAGE :CL-USER) ; compiling (DEFCLASS A-SUBCLASS ...) ; compiling (DEFCLASS A-CLASS ...)
; /Users/binghe/Lisp/src/warning.fasl written ; compilation finished in 0:00:00.014 #P"/Users/binghe/Lisp/src/warning.fasl" NIL NIL
--binghe
在 2011-3-20，09:06， Zach Beane 写道：
"Chun Tian (binghe)" binghe.lisp@gmail.com writes:
There's another compile-time warning in my CLOS related code, something like this:
(defclass a-class () ((slot :type 'a-subclass)))
(defclass a-subclass (a-class) ())
When compiling the first class definition, SBCL warn that the type A-SUBCLASS haven't been defined
I can't reproduce. Is this an oversimplification of your actual problem?
Zach