Can't compile on Raspberry Pi

[hanshuebner]

I'm trying to compile erlangen on a Rasperry Pi (latest Raspbian). It fails to compile, maybe you can spot the problem easily?

Thanks!
Hans

Welcome to Clozure Common Lisp Version 1.11-r16635  (LinuxARM32)!

CCL is developed and maintained by Clozure Associates. For more information
about CCL visit http://ccl.clozure.com.  To enquire about Clozure's Common Lisp
consulting services e-mail info@clozure.com or visit http://www.clozure.com.

? (ql:quickload :erlangen)
To load "erlangen":
  Load 1 ASDF system:
    erlangen
; Loading "erlangen"
> Error: The value 3690216436 is not of the expected type FIXNUM.
> While executing: MAKE-AGENT%, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > :b
*(76B2DAA8) : 0 (MAKE-AGENT% :MAILBOX #S(MAILBOX :QUEUE #<BOUNDED-FIFO-QUEUE capacity 64 #x152484CE> :PRIORITY #<JPL-QUEUES:UNBOUNDED-FIFO-QUEUE #x152482AE> ...) :LINKS NIL :MONITORS NIL :LOCK #<RECURSIVE-LOCK "erlangen.agent" [ptr @ #x7680CAA0] #x15247CFE> :SYMBOL NIL :BIRTHTIME 3690216436 :DEATHTIME 0) 360
 (76B2DAA8) : 1 (FUNCALL #'#<Anonymous Function #x15248656>) 116
 (76B2DAB8) : 2 (FUNCALL #'#<CCL::$FASL-LFUNCALL> #<CCL::FASLSTATE #x76B2E746>) 72
 (76B2DAC8) : 3 (%FASLOAD "/home/hans/.cache/common-lisp/ccl-1.11-f101-linux-arm/home/hans/quicklisp/local-projects/erlangen/agent.lafsl" #(#<Compiled-function CCL::$FASL-NOOP (Non-Global)  #x14035356> #<Compiled-function CCL::$FASL-S32-VECTOR (Non-Global)  #x14036E4E> #<Compiled-function CCL::$FASL-CODE-VECTOR (Non-Global)  #x14037176> CCL::%BAD-FASL #<Compiled-function CCL::$FASL-LFUNCALL (Non-Global)  #x14035616> ...)) 1084
 (76B2E790) : 4 (%LOAD #P"/home/hans/.cache/common-lisp/ccl-1.11-f101-linux-arm/home/hans/quicklisp/local-projects/erlangen/agent.lafsl" NIL NIL :ERROR :DEFAULT NIL) 2832
 (76B2E890) : 5 (LOAD #P"/home/hans/.cache/common-lisp/ccl-1.11-f101-linux-arm/home/hans/quicklisp/local-projects/erlangen/agent.lafsl" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT :PRESERVE-OPTIMIZATION-SETTINGS NIL) 832
 (76B2E988) : 6 (CALL-WITH-MUFFLED-CONDITIONS #<COMPILED-LEXICAL-CLOSURE (:INTERNAL UIOP/LISP-BUILD:LOAD*) #x15241066> ("Overwriting already existing readtable ~S." #(#:FINALIZERS-OFF-WARNING :ASDF-FINALIZERS))) 212
 (76B2E9F8) : 7 (%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE (NIL #<STANDARD-METHOD ASDF/ACTION:PERFORM #> . 497023470)) 872
 (76B2EA18) : 8 (%%STANDARD-COMBINED-METHOD-DCODE ((#<#>) (#<#>) #<STANDARD-METHOD ASDF/ACTION:PERFORM #>) 497023470) 132
 (76B2EA78) : 9 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS #> . 497023520)) 724
 (76B2EAD0) : 10 (FUNCALL #'#<#<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS (ASDF/LISP-ACTION:LOAD-OP ASDF/LISP-ACTION:CL-SOURCE-FILE)>> (NIL #<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS #> . 497023520) #<LOAD-OP :VERBOSE NIL>) 304
 (76B2EB68) : 11 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS #> . 497023520)) 724
 (76B2EBC0) : 12 (FUNCALL #'#<#<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)>> (NIL #<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS #> . 497023520) #<LOAD-OP :VERBOSE NIL>) 476
 (76B2EC88) : 13 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND #> #<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS #> #<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS #>) 497023520) 460
 (76B2ECC8) : 14 (FUNCALL #'#<#<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN (LIST)>> ((#<# > . #<# #>) (#<# > . #<# # #>) (#<# > . #<# # #>) (#<# > . #<# # #>) (#<# > . #<# # #>) ...) :FORCE NIL) 288
 (76B2ECE8) : 15 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN #> . 497023564)) 724
 (76B2ED40) : 16 (CALL-WITH-COMPILATION-UNIT #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY #) #x76B2ED7E> :OVERRIDE NIL) 120
 (76B2ED60) : 17 (FUNCALL #'#<#<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)>> (NIL #<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN #> . 497023564)) 256
 (76B2EDA8) : 18 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN :AROUND #> #<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN #>) 497023564) 460
 (76B2EE08) : 19 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN #> . 497023603)) 724
 (76B2EE60) : 20 (CALL-WITH-COMPILATION-UNIT #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY #) #x76B2EE9E> :OVERRIDE NIL) 120
 (76B2EE80) : 21 (FUNCALL #'#<#<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)>> (NIL #<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN #> . 497023603)) 256
 (76B2EEC8) : 22 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN :AROUND #> #<STANDARD-METHOD ASDF/PLAN:PERFORM-PLAN #>) 497023603) 460
 (76B2EF08) : 23 (FUNCALL #'#<#<STANDARD-METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)>> #<LOAD-OP :VERBOSE NIL> #<SYSTEM "erlangen"> :VERBOSE NIL) 172
 (76B2EF28) : 24 (%CALL-NEXT-METHOD ((NIL) #<STANDARD-METHOD ASDF/OPERATE:OPERATE #> #<LOAD-OP :VERBOSE NIL> #<SYSTEM "erlangen"> :VERBOSE ...)) 332
 (76B2EF80) : 25 (FUNCALL #'#<(:INTERNAL (ASDF/OPERATE:OPERATE :AROUND (T T)))>) 124

[eugeneia]

Wow great catch! The bug is I assumed a universal time would always fit a fixnum. Bad idea. Try a72889f please. (Already pushed to master.)

[hanshuebner]

Thanks for the quick turnaround, I can compile erlangen fine now!