Output from *break-on-signals* t as I load cl-opengl:
(BREAK "~A~%BREAK was entered because of *BREAK-ON-SIGNALS* ~ (now rebound to NIL)." #<TYPE-ERROR {AFA5109}>) 0] backtrace
0: (BREAK "~A~%BREAK was entered because of *BREAK-ON-SIGNALS* ~ (now rebound to NIL)." #<TYPE-ERROR {AFA5109}>) 1: (SIGNAL #<TYPE-ERROR {AFA5109}>)[:EXTERNAL] 2: (ERROR TYPE-ERROR)[:EXTERNAL] 3: (SB-KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER #<unavailable argument> #.(SB-SYS:INT-SAP #XB7901F88) #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #XB7901C5C :TYPE (* (SB-ALIEN:STRUCT
SB-VM::OS-CONTEXT-T-STRUCT))> (206 14)) 4: (SB-KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER #<unavailable argument> #.(SB-SYS:INT-SAP #XB7901F88) #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #XB7901C5C :TYPE (* (SB-ALIEN:STRUCT
SB-VM::OS-CONTEXT-T-STRUCT))> (206 14))[:EXTERNAL] 5: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB7901C5C) #<unavailable argument>) 6: ("foreign function: #x8063E2C") 7: ("foreign function: #x805224C") 8: ("foreign function: #x8056AAF") 9: ("foreign function: #x8056CE3") 10: (GENSYM NIL)[:EXTERNAL] 11: (ALEXANDRIA.0.DEV:MAKE-GENSYM-LIST 2 NIL) 12: (CFFI::%DEFCFUN NEW-LIST "glNewList" :VOID ((LIST UINT) (MODE ENUM)) (:CALLING-CONVENTION :CDECL :LIBRARY OPENGL) NIL) 13: (MACROEXPAND-1 (DEFCFUN ("glNewList" NEW-LIST :LIBRARY OPENGL) :VOID (LIST UINT) (MODE ENUM)) #<NULL-LEXENV>) 14: (SB-C::PREPROCESSOR-MACROEXPAND-1 (DEFCFUN ("glNewList" NEW-LIST :LIBRARY OPENGL) :VOID (LIST UINT) (MODE ENUM))) 15: ((FLET SB-C::DEFAULT-PROCESSOR) (DEFCFUN ("glNewList" NEW-LIST :LIBRARY OPENGL) :VOID (LIST UINT) (MODE ENUM))) 16: (SB-C::PROCESS-TOPLEVEL-FORM (DEFCFUN ("glNewList" NEW-LIST :LIBRARY OPENGL) :VOID (LIST UINT) (MODE ENUM)) ((PROGN (DECLAIM (INLINE NEW-LIST)) (DEFCFUN ("glNewList" NEW-LIST :LIBRARY OPENGL) :VOID (LIST UINT) (MODE ENUM))) SB-C::ORIGINAL-SOURCE-START 0 3) NIL) 17: (SB-C::PROCESS-TOPLEVEL-PROGN ((DECLAIM (INLINE NEW-LIST)) (DEFCFUN ("glNewList" NEW-LIST :LIBRARY OPENGL) :VOID (LIST UINT) (MODE ENUM))) ((PROGN (DECLAIM (INLINE NEW-LIST)) (DEFCFUN ("glNewList" NEW-LIST :LIBRARY OPENGL) :VOID (LIST UINT) (MODE ENUM))) SB-C::ORIGINAL-SOURCE-START 0 3) NIL) 18: (SB-C::PROCESS-TOPLEVEL-FORM (PROGN (DECLAIM (INLINE NEW-LIST)) (DEFCFUN ("glNewList" NEW-LIST :LIBRARY OPENGL) :VOID (LIST UINT) (MODE ENUM))) (SB-C::ORIGINAL-SOURCE-START 0 3) NIL) 19: ((FLET SB-C::DEFAULT-PROCESSOR) (DEFGLFUN ("glNewList" NEW-LIST) :VOID (LIST UINT) (MODE ENUM))) 20: (SB-C::PROCESS-TOPLEVEL-FORM (DEFGLFUN ("glNewList" NEW-LIST) :VOID (LIST UINT) (MODE ENUM)) (SB-C::ORIGINAL-SOURCE-START 0 3) NIL) 21: (SB-C::SUB-SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >) 22: ((LAMBDA ())) 23: (SB-C::%WITH-COMPILATION-UNIT #<CLOSURE (LAMBDA #) {AF8015D}>)[:EXTERNAL] 24: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >) 25: (COMPILE-FILE #P"/home/charlie/opengl/cl-opengl/gl/funcs.lisp")[:EXTERNAL]