The value :L-H is not of type SEQUENCE [Condition of type TYPE-ERROR] Restarts: 0: [ABORT] Don't handle # :L-H .07> in #. 1: [LEAVE] Leave # from the loop. 2: [SKIP-EVENT] Skip handling the event entirely. 3: [ABORT] Don't handle # :L-H .07> in #. 4: [LEAVE] Leave # from the loop. 5: [DISCARD-EVENTS] Discard all remaining events and exit --more-- Backtrace: 0: (FIND :L-H :L-H) 1: ((LAMBDA (LOOP TRIAL:EVENT) :IN "C:/Users/Janne/quicklisp/local-projects/shirakumo/trial/mapping.lisp") # # :L-H .07>) 2: (TRIAL:MAP-EVENT # :L-H .07> #) 3: ((:METHOD TRIAL:HANDLE :AROUND (TRIAL:EVENT T)) # :L-H .07> #) [fast-method] 4: ((:METHOD TRIAL:HANDLE (TRIAL:EVENT TRIAL:EVENT-LOOP)) # :L-H .07> #) [fast-method] 5: ((:METHOD TRIAL:HANDLE :AROUND (TRIAL:EVENT T)) # :L-H .07> #) [fast-method] 6: (TRIAL::MAP-QUEUE # #) 7: ((:METHOD TRIAL:PROCESS (TRIAL:EVENT-LOOP)) #) [fast-method] 8: ((SB-PCL::EMF TRIAL:UPDATE) # # # 0.0d0 0.01 0) 9: ((:METHOD TRIAL:RENDER-LOOP (TRIAL:RENDER-LOOP)) #) [fast-method] 10: ((:METHOD TRIAL:RENDER-LOOP :AROUND (TRIAL:DISPLAY)) #) [fast-method] 11: ((LAMBDA NIL :IN TRIAL:MAKE-THREAD)) 12: ((LAMBDA NIL :IN BORDEAUX-THREADS::BINDING-DEFAULT-SPECIALS)) 13: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN)) 14: ((FLET "WITHOUT-INTERRUPTS-BODY-114" :IN SB-THREAD::RUN)) 15: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN)) 16: ((FLET "WITHOUT-INTERRUPTS-BODY-107" :IN SB-THREAD::RUN)) 17: (SB-THREAD::RUN) 18: ("foreign function: #x14003E9E5") 19: ("foreign function: #x140006A8A")