On Sun, Jul 5, 2009 at 7:59 PM, Luke J Crook <l...@balooga.com> wrote:
> On Sat, 04 Jul 2009 14:20:48 -0700, Elliott Slaughter > <elliottslaugh...@gmail.com> wrote: > > > Hi, > > > > When I try Lispbuilder-SDL on Clozure CCL 1.3, it seems to compile fine, > > but > > gives me an error when I try to run the mandelbrot example. (I get > > similar > > results with other examples.) > > > > ? (sdl-examples:mandelbrot) > >> Error: Cannot lock surface > >> While executing: LISPBUILDER-SDL-EXAMPLES::UPDATE-MANDELBROT-DRAW, in > > process listener(1). > > Perhaps CCL doesn't like my type declaration 'optimization' in that macro? > I have committed a change to svn to remove that. Can you try again? (I'm > just guessing right now). If the type declaration is the problem then > there are going quite a few changes to support CCL. > I still get: ? (sdl-examples:mandelbrot) > Error: Cannot lock surface > While executing: LISPBUILDER-SDL-EXAMPLES::UPDATE-MANDELBROT-DRAW, in process listener(1). > Type :POP to abort, :R for a list of available restarts. > Type :? for other options. 1 > :b (454C04) : 0 (UPDATE-MANDELBROT-DRAW 300 300 0 0 30 30 0.2 0.5 0.4 0.7) 215 (454C40) : 1 (FUNCALL #'#<(:INTERNAL LISPBUILDER-SDL-EXAMPLES:MANDELBROT)>) 327 (454C70) : 2 (%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE (NIL #<STANDARD-METHOD LISPBUILDER-SDL-BASE::PROCESS-TIMESTEP #> . 1135429)) 871 (454CA0) : 3 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD LISPBUILDER-SDL-BASE::PROCESS-TIMESTEP #> . 1135429)) 503 (454CD4) : 4 (FUNCALL #'#<#<STANDARD-METHOD LISPBUILDER-SDL-BASE::PROCESS-TIMESTEP :AROUND (LISPBUILDER-SDL-BASE::FPS-MANAGER T)>> #<LISPBUILDER-SDL-BASE::FPS-FIXED #x8FCBA0E> #<COMPILED-LEXICAL-CLOSURE (:INTERNAL LISPBUILDER-SDL-EXAMPLES:MANDELBROT) #x8FC945E>) 671 (454CE8) : 5 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD LISPBUILDER-SDL-BASE::PROCESS-TIMESTEP :AROUND #> NIL (#<#>) #<STANDARD-METHOD LISPBUILDER-SDL-BASE::PROCESS-TIMESTEP #>) 1135429) 679 (454D20) : 7 (MANDELBROT 300 300 0.2 0.5 0.4 0.7) 3167 (454D8C) : 8 (CALL-CHECK-REGS LISPBUILDER-SDL-EXAMPLES:MANDELBROT) 247 (454DA8) : 9 (TOPLEVEL-EVAL (LISPBUILDER-SDL-EXAMPLES:MANDELBROT) NIL) 751 (454DE8) : 10 (READ-LOOP :INPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x89C4656> :OUTPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x89C457E> :BREAK-LEVEL 0 :PROMPT-FUNCTION #<Compiled-function (:INTERNAL CCL::READ-LOOP) (Non-Global) #x83844A6>) 1815 (454EFC) : 11 (TOPLEVEL-LOOP) 71 (454F04) : 12 (FUNCALL #'#<(:INTERNAL (TOPLEVEL-FUNCTION (CCL::LISP-DEVELOPMENT-SYSTEM T)))>) 95 (454F14) : 13 (FUNCALL #'#<(:INTERNAL CCL::MAKE-MCL-LISTENER-PROCESS)>) 583 (454F60) : 14 (RUN-PROCESS-INITIAL-FORM #<TTY-LISTENER listener(1) [Active] #x89C3BB6> (#<COMPILED-LEXICAL-CLOSURE # #x89C39E6>)) 671 (454FA4) : 15 (FUNCALL #'#<(:INTERNAL CCL::%PROCESS-PRESET-INTERNAL)> #<TTY-LISTENER listener(1) [Active] #x89C3BB6> (#<COMPILED-LEXICAL-CLOSURE # #x89C39E6>)) 335 (454FCC) : 16 (FUNCALL #'#<(:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION)>) 279 1 > -- Elliott Slaughter "Don't worry about what anybody else is going to do. The best way to predict the future is to invent it." - Alan Kay
_______________________________________________ application-builder mailing list application-builder@lispniks.com http://www.lispniks.com/mailman/listinfo/application-builder
