From fahree at gmail.com Thu Feb 21 04:27:05 2013 From: fahree at gmail.com (=?ISO-8859-1?Q?Far=E9?=) Date: Wed, 20 Feb 2013 23:27:05 -0500 Subject: [Cl-neo4j-devel] cl-neo4j and asdf3 Message-ID: Dear Lisp hacker(s), ASDF3 now checks deferred warnings by default. On SBCL, this means that it will treat as an error any undeclared free variable, including forward references to special variables as well as any undefined function that isn't defined by the end of the system. Using cl-test-grid to compile all the systems in quicklisp, we found the following failure on a system we believe you maintain. Can you please fix it? ??? ? Fran?ois-Ren? ?VB Rideau ?Reflection&Cybernethics? http://fare.tunes.org Be careful what you set your heart on ? for it will surely be yours. ? James Baldwin, "Nobody Knows My Name" http://cl-test-grid.appspot.com/blob?key=1m4w33y09n ; /home/testgrid/agent-workdir/test-runs/20130220230445-sbcl-1.1.1-linux-x86/fasl/ql/dists/quicklisp/software/cl-neo4j-release-b8ad637a-git/src/wrapper-ASDF-TMP.fasl written ; compilation finished in 0:00:00.133 ; file: /home/testgrid/quicklisp-patched2/dists/quicklisp/software/cl-neo4j-release-b8ad637a-git/src/utilities.lisp ; in: ; DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD (T (EQL :RELATIONSHIP-URL)) ; (DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD ; (CL-NEO4J::OBJECT (CL-NEO4J::ENCODE-TYPE (EQL :RELATIONSHIP-URL)) ; &KEY (CL-NEO4J::HOST CL-NEO4J:*NEO4J-HOST*) ; (CL-NEO4J::PORT CL-NEO4J:*NEO4J-PORT*)) ; (DECLARE (IGNORE CL-NEO4J::ENCODE-TYPE)) ; (CL-NEO4J::FORMAT-NEO4J-QUERY CL-NEO4J::HOST CL-NEO4J::PORT ; (FORMAT NIL "relationship/~A" CL-NEO4J::OBJECT))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER PROGN SB-PCL::LOAD-DEFMETHOD ; ==> ; (IF #:N-SUPPLIED-111 ; #:HOST-DEFAULTING-TEMP ; CL-NEO4J:*NEO4J-HOST*) ; ; caught WARNING: ; undefined variable: CL-NEO4J:*NEO4J-HOST* ; in: ; DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD (T (EQL :NODE-URL-SINGLE)) ; (DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD ; (CL-NEO4J::OBJECT (CL-NEO4J::ENCODE-TYPE (EQL :NODE-URL-SINGLE)) ; &KEY (CL-NEO4J::HOST CL-NEO4J:*NEO4J-HOST*) ; (CL-NEO4J::PORT CL-NEO4J:*NEO4J-PORT*)) ; (DECLARE (IGNORE CL-NEO4J::ENCODE-TYPE)) ; (CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD ; (CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD CL-NEO4J::OBJECT :NODE-URL :HOST ; CL-NEO4J::HOST :PORT CL-NEO4J::PORT) ; :STRING)) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER PROGN SB-PCL::LOAD-DEFMETHOD ; ==> ; (IF #:N-SUPPLIED-81 ; #:HOST-DEFAULTING-TEMP ; CL-NEO4J:*NEO4J-HOST*) ; ; caught WARNING: ; undefined variable: CL-NEO4J:*NEO4J-HOST* ; in: DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD (T (EQL :NODE-URL)) ; (DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD ; (CL-NEO4J::OBJECT (CL-NEO4J::ENCODE-TYPE (EQL :NODE-URL)) ; &KEY (CL-NEO4J::HOST CL-NEO4J:*NEO4J-HOST*) ; (CL-NEO4J::PORT CL-NEO4J:*NEO4J-PORT*)) ; (DECLARE (IGNORE CL-NEO4J::ENCODE-TYPE)) ; (CL-NEO4J::FORMAT-NEO4J-QUERY CL-NEO4J::HOST CL-NEO4J::PORT ; (FORMAT NIL "node/~A" CL-NEO4J::OBJECT))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER PROGN SB-PCL::LOAD-DEFMETHOD ; ==> ; (IF #:N-SUPPLIED-51 ; #:HOST-DEFAULTING-TEMP ; CL-NEO4J:*NEO4J-HOST*) ; ; caught WARNING: ; undefined variable: CL-NEO4J:*NEO4J-HOST* ; ; caught WARNING: ; 1 more use of undefined variable CL-NEO4J:*NEO4J-HOST* ; file: /home/testgrid/quicklisp-patched2/dists/quicklisp/software/cl-neo4j-release-b8ad637a-git/src/utilities.lisp ; in: ; DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD (T (EQL :RELATIONSHIP-URL)) ; (DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD ; (CL-NEO4J::OBJECT (CL-NEO4J::ENCODE-TYPE (EQL :RELATIONSHIP-URL)) ; &KEY (CL-NEO4J::HOST CL-NEO4J:*NEO4J-HOST*) ; (CL-NEO4J::PORT CL-NEO4J:*NEO4J-PORT*)) ; (DECLARE (IGNORE CL-NEO4J::ENCODE-TYPE)) ; (CL-NEO4J::FORMAT-NEO4J-QUERY CL-NEO4J::HOST CL-NEO4J::PORT ; (FORMAT NIL "relationship/~A" CL-NEO4J::OBJECT))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER PROGN SB-PCL::LOAD-DEFMETHOD ; ==> ; (IF #:N-SUPPLIED-112 ; #:PORT-DEFAULTING-TEMP ; CL-NEO4J:*NEO4J-PORT*) ; ; caught WARNING: ; undefined variable: CL-NEO4J:*NEO4J-PORT* ; in: ; DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD (T (EQL :NODE-URL-SINGLE)) ; (DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD ; (CL-NEO4J::OBJECT (CL-NEO4J::ENCODE-TYPE (EQL :NODE-URL-SINGLE)) ; &KEY (CL-NEO4J::HOST CL-NEO4J:*NEO4J-HOST*) ; (CL-NEO4J::PORT CL-NEO4J:*NEO4J-PORT*)) ; (DECLARE (IGNORE CL-NEO4J::ENCODE-TYPE)) ; (CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD ; (CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD CL-NEO4J::OBJECT :NODE-URL :HOST ; CL-NEO4J::HOST :PORT CL-NEO4J::PORT) ; :STRING)) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER PROGN SB-PCL::LOAD-DEFMETHOD ; ==> ; (IF #:N-SUPPLIED-82 ; #:PORT-DEFAULTING-TEMP ; CL-NEO4J:*NEO4J-PORT*) ; ; caught WARNING: ; undefined variable: CL-NEO4J:*NEO4J-PORT* ; in: DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD (T (EQL :NODE-URL)) ; (DEFMETHOD CL-NEO4J::ENCODE-NEO4J-JSON-PAYLOAD ; (CL-NEO4J::OBJECT (CL-NEO4J::ENCODE-TYPE (EQL :NODE-URL)) ; &KEY (CL-NEO4J::HOST CL-NEO4J:*NEO4J-HOST*) ; (CL-NEO4J::PORT CL-NEO4J:*NEO4J-PORT*)) ; (DECLARE (IGNORE CL-NEO4J::ENCODE-TYPE)) ; (CL-NEO4J::FORMAT-NEO4J-QUERY CL-NEO4J::HOST CL-NEO4J::PORT ; (FORMAT NIL "node/~A" CL-NEO4J::OBJECT))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER PROGN SB-PCL::LOAD-DEFMETHOD ; ==> ; (IF #:N-SUPPLIED-52 ; #:PORT-DEFAULTING-TEMP ; CL-NEO4J:*NEO4J-PORT*) ; ; caught WARNING: ; undefined variable: CL-NEO4J:*NEO4J-PORT* ; ; caught WARNING: ; 1 more use of undefined variable CL-NEO4J:*NEO4J-PORT* ; ; compilation unit finished ; Undefined variables: ; CL-NEO4J:*NEO4J-HOST* CL-NEO4J:*NEO4J-PORT* ; caught 8 WARNING conditions ; caught 126 STYLE-WARNING conditions Unhandled SERIOUS-CONDITION of type COMPILE-FAILED-ERROR is signaled: Lisp compilation failed