search

mishoo / sytes

A Common Lisp library for making simple websites quickly
http://lisperator.net/sytes/
45 stars 11 forks source link

value SYTES.%RUNTIME%::|body| is not of the expected type LIST #1

Closed r-moeritz closed 12 years ago

r-moeritz commented 12 years ago

I get the following error after checking out the latest commit from GH into ~/quicklisp/local-projects/ & trying to do a (ql:quickload :sytes). I'm running Clozure Common Lisp Version 1.8-r15286M (WindowsX8632).

Error details as reported by SLIME:

value SYTES.%RUNTIME%::|body| is not of the expected type LIST.
   [Condition of type TYPE-ERROR]

Restarts:
 0: [LOAD-SOURCE] Load "home:quicklisp;local-projects;sytes;template;compiler.lisp" instead of "C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"
 1: [RECOMPILE] Compile "home:quicklisp;local-projects;sytes;template;compiler.lisp" into "C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" then load "C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" again
 2: [RETRY-LOAD] Retry loading #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"
 3: [SKIP-LOAD] Skip loading #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"
 4: [LOAD-OTHER] Load other file instead of #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"
 5: [TRY-RECOMPILING] Recompile compiler and try loading it again
 --more--

Backtrace:
  0: (SYTES.TEMPLATE::COMP-FUNCALL SYTES.%RUNTIME%::|condition| SYTES.%RUNTIME%::|body|)
  1: (SYTES.TEMPLATE::COMP-FUNCALL SYTES.%RUNTIME%::|defmacro| (SYTES.%RUNTIME%::|when| (SYTES.%RUNTIME%::|condition| . SYTES.%RUNTIME%::|body|) SYTES.%RUNTIME%::\
 ..))))))
  2: (SYTES.TEMPLATE::COMP-FUNCALL SYTES.%RUNTIME%::|eval-when-compile
| (SYTES.%RUNTIME%::\
 ..))))))
  3: (SYTES.TEMPLATE::COMP-FUNCALL SYTES.%RUNTIME%::|strcat| ((SYTES.%RUNTIME%::|eval-when-compile
| SYTES.%RUNTIME%::\
 ((SYTES.%RUNTIME%::|lambda| # SYTES.%RUNTIME%::\
 # SYTES.%RUNTIME%::\
 #) NIL) ..))..
  4: (SYTES.TEMPLATE::COMPILE (SYTES.%RUNTIME%::|strcat| ..))) :CONTEXT #S(SYTES.TEMPLATE::CONTEXT :NAME "TOPLEVEL" :PARENT NIL :ROOT ...))
  5: (#<Anonymous Function #xD7FD7B6>)
  6: (CCL::$FASL-LFUNCALL #<CCL::FASLSTATE #x448512EE>)
  7: (CCL::%FASLOAD "C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" #(#<Compiled-function CCL::$FASL-NOOP (Non-..
  8: (CCL::%LOAD #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" NIL NIL :ERROR :DEFAULT)
  9: (LOAD #P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR ..
 10: (MAP NIL #<Compiled-function LOAD #x4115986> (#P"C:/Users/ralphm/AppData/Local/common-lisp/cache/ccl-1.8-f95-win-x86/C/Users/ralphm/quicklisp/local-projects/sytes/template/compiler.wx32fsl"))
 11: (CCL::%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE (NIL #<STANDARD-METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)> . 287221254))
 12: (CCL::%%STANDARD-COMBINED-METHOD-DCODE (NIL (#<STANDARD-METHOD ASDF:PERFORM :AFTER (ASDF:OPERATION ASDF:COMPONENT)>) #<STANDARD-METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)>) 287221254)
 13: (NIL #<Unknown Arguments>)
 14: (CCL::%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS (T T)> . 287221321))
 15: (#<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)> #<LOAD-OP (:VERBOSE NIL) #xD518DB6> #<CL-SOURCE-FILE "sytes" "template" "compiler">)
 16: (CCL::%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS (T T)> . 287221321))
 17: (#<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS :AROUND (T T)> #<LOAD-OP (:VERBOSE NIL) #xD518DB6> #<CL-SOURCE-FILE "sytes" "template" "compiler">)
 18: (CCL::%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS :AROUND (T T)> #<STANDARD-METHOD ASDF::PERFORM-WITH-RESTARTS (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)> ..) 287221321)
 19: (NIL #<Unknown Arguments>)
 --more--
mishoo commented 12 years ago

I never tried it on Windows :-( I suspect it might have various problems there. If you figure it out I'd be glad to merge a patch. ;-) I also didn't try it running on CCL, but as far as I remember there's nothing SBCL-specific in the library itself.

r-moeritz commented 12 years ago

I managed to fix the issue & have sent you a pull request. Successfully loaded "hello world" on CCL on Windows. Yay!