honix / artilico Goto Github PK

Unhandled SIMPLE-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING
                                    {1001930083}>:
  13 is not defined as a value for enum type #<CFFI::FOREIGN-ENUM CL-GLUT:SPECIAL-KEYS>.

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {1001930083}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<SIMPLE-ERROR "~S is not defined as a value for enum type ~S." {1002797633}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<SIMPLE-ERROR "~S is not defined as a value for enum type ~S." {1002797633}>)
2: (INVOKE-DEBUGGER #<SIMPLE-ERROR "~S is not defined as a value for enum type ~S." {1002797633}>)
3: (ERROR "~S is not defined as a value for enum type ~S." 13 #<CFFI::FOREIGN-ENUM CL-GLUT:SPECIAL-KEYS>)
4: (CFFI::%FOREIGN-ENUM-KEYWORD #<CFFI::FOREIGN-ENUM CL-GLUT:SPECIAL-KEYS> 13 :ERRORP T)
5: ((LAMBDA (CL-GLUT::SPECIAL-KEY CL-GLUT::X CL-GLUT::Y) :IN "/Users/art/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-opengl-20171019-git/glut/interface.lisp") 13 299 211)
6: ((LAMBDA (SB-ALIEN::ARGS-POINTER SB-ALIEN::RESULT-POINTER FUNCTION) :IN "/Users/art/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-opengl-20171019-git/glut/interface.lisp") #<unavailable argument> #<unavailable argument> #<unavailable argument>)
7: ("foreign function: funcall_alien_callback")
8: ("foreign function: #x2010095C")
9: ("foreign function: objc_msgSend")
10: ("foreign function: -[NSWindow _reallySendEvent:isDelayedEvent:]")
11: ("foreign function: -[NSWindow sendEvent:]")
12: ("foreign function: -[GLUTWindow sendEvent:]")
13: ("foreign function: -[NSApplication sendEvent:]")
14: ("foreign function: -[GLUTApplication _runMainLoopUntilDate:autoreleasePool:]")
15: ("foreign function: -[GLUTApplication runOnce]")
16: ("foreign function: glutCheckLoop")
17: (CL-GLUT::CHECK-LOOP)
18: (CL-GLUT:MAIN-LOOP)
19: ((:METHOD CL-GLUT:DISPLAY-WINDOW :AROUND (CL-GLUT:WINDOW)) #<ARTILICO::ARTILICO-WINDOW {100524EAC3}>) [fast-method]
20: (SB-INT:SIMPLE-EVAL-IN-LEXENV (APPLY (QUOTE MAIN) ROSWELL:*ARGV*) #<NULL-LEXENV>)
21: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ROSWELL:QUIT (APPLY (QUOTE MAIN) ROSWELL:*ARGV*)) #<NULL-LEXENV>)
22: (SB-EXT:EVAL-TLF (ROSWELL:QUIT (APPLY (QUOTE MAIN) ROSWELL:*ARGV*)) NIL NIL)
23: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (ROSWELL:QUIT (APPLY (QUOTE MAIN) ROSWELL:*ARGV*)) NIL)
24: (SB-INT:LOAD-AS-SOURCE #<CONCATENATED-STREAM :STREAMS NIL {1002B0A693}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
25: ((FLET SB-FASL::THUNK :IN LOAD))
26: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<CLOSURE (FLET SB-FASL::THUNK :IN LOAD) {21FF56B}> #<CONCATENATED-STREAM :STREAMS NIL {1002B0A693}>)
27: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<CONCATENATED-STREAM :STREAMS NIL {1002B0A693}> NIL)
28: (LOAD #<CONCATENATED-STREAM :STREAMS NIL {1002B0A693}> :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
29: ((FLET ROSWELL::BODY :IN ROSWELL:SCRIPT) #<SB-SYS:FD-STREAM for "file /Users/art/common-lisp/Artilico/roswell/artilico.ros" {1002B05B03}>)
30: (ROSWELL:SCRIPT "roswell/artilico.ros")
31: (ROSWELL:RUN ((:EVAL "(ros:quicklisp)") (:SCRIPT "roswell/artilico.ros") (:QUIT NIL)))
32: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ROSWELL:RUN (QUOTE ((:EVAL "(ros:quicklisp)") (:SCRIPT "roswell/artilico.ros") (:QUIT NIL)))) #<NULL-LEXENV>)
33: (EVAL (ROSWELL:RUN (QUOTE ((:EVAL "(ros:quicklisp)") (:SCRIPT "roswell/artilico.ros") (:QUIT NIL)))))
34: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(progn #-ros.init(cl:load \"/Users/art/usr/roswell/etc/roswell/init.lisp\"))") (:EVAL . "(ros:run '((:eval\"(ros:quicklisp)\")(:script \"roswell/artilico.ros\")(:quit ())))")))
35: (SB-IMPL::TOPLEVEL-INIT)
36: ((FLET "WITHOUT-INTERRUPTS-BODY-35" :IN SB-EXT:SAVE-LISP-AND-DIE))
37: ((LABELS SB-IMPL::RESTART-LISP :IN SB-EXT:SAVE-LISP-AND-DIE))

unhandled condition in --disable-debugger mode, quitting