ruricolist / spinneret

Common Lisp HTML5 generator
MIT License
369 stars 26 forks source link

spinneret fails to build on ABCL #25

Closed slyrus closed 6 years ago

slyrus commented 6 years ago

When loading spinneret with ABCL, I get the following error:

The function SERAPEUM::ITEM is undefined.
   [Condition of type UNDEFINED-FUNCTION]

Restarts:
 0: [CONTINUE] Try again.
 1: [USE-VALUE] Specify a function to call instead.
 2: [RETURN-VALUE] Return one or more values from the call to SERAPEUM::ITEM.
 3: [RETRY] Retry compiling #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "level2" "range">.
 4: [ACCEPT] Continue, treating compiling #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "level2" "range"> as having been successful.
 5: [RETRY] Retry ASDF operation.
 --more--

Backtrace:
  0: (#<FUNCTION {7480E6B9}> #<UNDEFINED-FUNCTION {486C948A}> #<FUNCTION {7480E6B9}>)
  1: (APPLY #<FUNCTION {7480E6B9}> (#<UNDEFINED-FUNCTION {486C948A}> #<FUNCTION {7480E6B9}>))
  2: (SYSTEM::RUN-HOOK SYSTEM::*INVOKE-DEBUGGER-HOOK* #<UNDEFINED-FUNCTION {486C948A}> #<FUNCTION {7480E6B9}>)
  3: (INVOKE-DEBUGGER #<UNDEFINED-FUNCTION {486C948A}>)
  4: (ERROR #<UNDEFINED-FUNCTION {486C948A}>)
  5: (SYSTEM:UNDEFINED-FUNCTION-CALLED SERAPEUM::ITEM ((ALEXANDRIA.0.DEV:ARRAY-INDEX ALEXANDRIA.0.DEV:NON-NEGATIVE-INTEGER INTEGER RATIO RATIONAL SINGLE-FLOAT ...)))
  6: (SERAPEUM::ITEM (ALEXANDRIA.0.DEV:ARRAY-INDEX ALEXANDRIA.0.DEV:NON-NEGATIVE-INTEGER INTEGER RATIO RATIONAL SINGLE-FLOAT ...))
  7: (SERAPEUM:ORDERING (ALEXANDRIA.0.DEV:ARRAY-INDEX ALEXANDRIA.0.DEV:NON-NEGATIVE-INTEGER INTEGER RATIO RATIONAL SINGLE-FLOAT ...) :TEST #<EQL {5864E467}> :UNORDERED-TO-END NIL ...)
  8: (SERAPEUM:TOPOSORT ((ALEXANDRIA.0.DEV:ARRAY-INDEX ALEXANDRIA.0.DEV:NON-NEGATIVE-INTEGER) (ALEXANDRIA.0.DEV:ARRAY-INDEX INTEGER) (ALEXANDRIA.0.DEV:ARRAY-INDEX RATIONAL) (ALEXANDRIA.0.DEV:NON-NEGATIVE-I..
  9: (SERAPEUM/DISPATCH-CASE::SORT-CLAUSES (((ALEXANDRIA.0.DEV:ARRAY-INDEX ALEXANDRIA.0.DEV:ARRAY-INDEX ALEXANDRIA.0.DEV:NON-NEGATIVE-INTEGER) (GO #:TAG126047)) ((ALEXANDRIA.0.DEV:NON-NEGATIVE-INTEGER ALEX..
 10: ((MACRO-FUNCTION SERAPEUM/DISPATCH-CASE::DISPATCH-CASE/NOBINDINGS) (SERAPEUM/DISPATCH-CASE::DISPATCH-CASE/NOBINDINGS ((#:ARG0 SERAPEUM::REAL*) (#:ARG1 SERAPEUM::REAL*) (#:ARG2 SERAPEUM::REAL*)) ((ALEX..
 11: (MACROEXPAND-1 (SERAPEUM/DISPATCH-CASE::DISPATCH-CASE/NOBINDINGS ((#:ARG0 SERAPEUM::REAL*) (#:ARG1 SERAPEUM::REAL*) (#:ARG2 SERAPEUM::REAL*)) ((ALEXANDRIA.0.DEV:ARRAY-INDEX ALEXANDRIA.0.DEV:ARRAY-INDE..
 12: (PRECOMPILER::PRECOMPILE1 (SERAPEUM/DISPATCH-CASE::DISPATCH-CASE/NOBINDINGS ((#:ARG0 SERAPEUM::REAL*) (#:ARG1 SERAPEUM::REAL*) (#:ARG2 SERAPEUM::REAL*)) ((ALEXANDRIA.0.DEV:ARRAY-INDEX ALEXANDRIA.0.DEV..
 13: (PRECOMPILER::PRECOMPILE-TAGBODY (TAGBODY (SERAPEUM/DISPATCH-CASE::DISPATCH-CASE/NOBINDINGS (# # #) (# #) (# #) (# #) (# #) ...) #:TAG126047 (RETURN-FROM #:BLOCK126046 (PROGN #)) #:TAG126048 (RETURN-F..
 14: (PRECOMPILER::PRECOMPILE1 (TAGBODY (SERAPEUM/DISPATCH-CASE::DISPATCH-CASE/NOBINDINGS (# # #) (# #) (# #) (# #) (# #) ...) #:TAG126047 (RETURN-FROM #:BLOCK126046 (PROGN #)) #:TAG126048 (RETURN-FROM #:B..
 15: (PRECOMPILER::PRECOMPILE-BLOCK (BLOCK #:BLOCK126046 (TAGBODY (SERAPEUM/DISPATCH-CASE::DISPATCH-CASE/NOBINDINGS # # # # # ...) #:TAG126047 (RETURN-FROM #:BLOCK126046 #) #:TAG126048 (RETURN-FROM #:BLOCK..
 16: (PRECOMPILER::PRECOMPILE1 (BLOCK #:BLOCK126046 (TAGBODY (SERAPEUM/DISPATCH-CASE::DISPATCH-CASE/NOBINDINGS # # # # # ...) #:TAG126047 (RETURN-FROM #:BLOCK126046 #) #:TAG126048 (RETURN-FROM #:BLOCK12604..
 17: (PRECOMPILER::PRECOMPILE-PROGN (PROGN (BLOCK #:BLOCK126046 (TAGBODY # #:TAG126047 # #:TAG126048 # ...))))
 18: (PRECOMPILER::PRECOMPILE1 (PROGN (BLOCK #:BLOCK126046 (TAGBODY # #:TAG126047 # #:TAG126048 # ...))))
 19: (PRECOMPILER::PRECOMPILE1 (SERAPEUM:WITH-READ-ONLY-VARS (#:ARG0 #:ARG1 #:ARG2) (BLOCK #:BLOCK126046 (TAGBODY # #:TAG126047 # #:TAG126048 # ...))))
 --more--
slyrus commented 6 years ago

Oh wait, this is a serapeum problem.