I call draw-line-* like this:
(sdl:draw-line-* x y x1 y1 :surface some-surface
:color (sdl:color :r 200 :g 50 :b 50))
and it goes down on me like that:
The value 3358733055 is not of type FIXNUM.
BREAK was entered because of *BREAK-ON-SIGNALS* (now rebound to NIL).
[Condition of type SIMPLE-CONDITION]
Restarts:
0: [CONTINUE] Return from BREAK.
1: [REASSIGN] Return from BREAK and assign a new value to *BREAK-ON-SIGNALS*.
2: [ABORT] Return to SLIME's top level.
3: [TERMINATE-THREAD] Terminate this thread (#<THREAD "repl-thread" {AFCD319}>)
Backtrace:
0: (BREAK
"~A~%BREAK was entered because of *BREAK-ON-SIGNALS* ~
(now rebound to NIL)."
#<TYPE-ERROR {B362411}>)
1: (SIGNAL #<TYPE-ERROR {B362411}>)
2: (ERROR TYPE-ERROR)
3: (SB-KERNEL::OBJECT-NOT-FIXNUM-ERROR-HANDLER
#<unavailable argument>
#.(SB-SYS:INT-SAP #XB65AA8EC)
#<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #XB65AA54C :TYPE (*
(STRUCT
SB-VM::OS-CONTEXT-T-STRUCT))>
(142))
Locals:
SB-DEBUG::ARG-0 = 4
SB-DEBUG::ARG-1 = :<NOT-AVAILABLE>
SB-DEBUG::ARG-2 = #.(SB-SYS:INT-SAP #XB65AA8EC)
SB-DEBUG::ARG-3 = #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #XB65AA54C
:TYPE (*
(STRUCT
SB-VM::OS-CONTEXT-T-STRUCT))>
SB-DEBUG::ARG-4 = (142)
4: (SB-KERNEL:INTERNAL-ERROR
#.(SB-SYS:INT-SAP #XB65AA54C)
#<unavailable argument>)
5: ("foreign function: call_into_lisp")
6: ("foreign function: funcall2")
7: ("foreign function: interrupt_internal_error")
8: ("foreign function: sigtrap_handler")
9: (LISPBUILDER-SDL:DRAW-LINE-*
594
87
600
93
:SURFACE
#<LISPBUILDER-SDL:SURFACE {B310949}>
:COLOR
#<LISPBUILDER-SDL:COLOR {B35D231}>
:CLIPPING-P ..)
Locals:
#:CLIPPING-P-DEFAULTING-TEMP = T
#:COLOR-DEFAULTING-TEMP = #<LISPBUILDER-SDL:COLOR {B35D231}>
#:N-SUPPLIED-251 = T
#:N-SUPPLIED-252 = T
#:SURFACE-DEFAULTING-TEMP = #<LISPBUILDER-SDL:SURFACE {B310949}>
LISPBUILDER-SDL::X0 = 594
LISPBUILDER-SDL::X1 = 600
LISPBUILDER-SDL::Y0 = 87
LISPBUILDER-SDL::Y1 = 93
regards, Samium Gromoff
_______________________________________________
application-builder mailing list
[email protected]
http://www.lispniks.com/mailman/listinfo/application-builder
