--- On Tue, 2/6/09, Luís Oliveira luismbo@gmail.com wrote:

...

Is cl-opengl supposed to work with Clozure? I'm

running Clozure on Win32,

...

and I'm able to load cl-opengl using (asdf:oos

'asdf:load-op :cl-glut-

...

examples), however upon running one of the examples

Clozure crashes out to

...

its kernel debugger.

Yes, and it works for me on Linux/x86-64. I do not have access to a Windows system at the moment. Perhaps you could paste a backtrace?

Certainly.

Exception on foreign stack

Exception occurred while executing foreign code ? for help [7560] Clozure CL kernel debugger: B current thread: tcr = 0x5cb310, native thread ID = 0x1980, interrupts enabled

(#x00B80D44) #x08DC69A5 : #<Function %GLUTMAINLOOP #x08DC6946> + 95 (#x00B80D4C) #x08DC676D : #<Function MAIN-LOOP #x08DC6756> + 23 (#x00B80D54) #x081139A5 : #<Function %%STANDARD-COMBINED-METHOD-DCODE #x081136FE> + 679 (#x00B80D8C) #x083686DD : #<Function CALL-CHECK-REGS #x083685E6> + 247 (#x00B80DA8) #x083744B5 : #<Function TOPLEVEL-EVAL #x083741C6> + 751 (#x00B80DE8) #x08375E25 : #<Function READ-LOOP #x0837570E> + 1815 (#x00B80EFC) #x0836832D : #<Function TOPLEVEL-LOOP #x083682E6> + 71 (#x00B80F04) #x08318175 : #<Function (:INTERNAL (TOPLEVEL-FUNCTION (LISP-DEVELOPMENT-SYSTEM T))) #x08318116> + 95 (#x00B80F14) #x083D945D : #<Function (:INTERNAL MAKE-MCL-LISTENER-PROCESS) #x083D9216> + 583 (#x00B80F60) #x08330A95 : #<Function RUN-PROCESS-INITIAL-FORM #x083307F6> + 671 (#x00B80FA4) #x083312E5 : #<Function (:INTERNAL %PROCESS-PRESET-INTERNAL) #x08331196> + 335 (#x00B80FCC) #x083061BD : #<Function (:INTERNAL THREAD-MAKE-STARTUP-FUNCTION) #x083060A6> + 279 [7560] Clozure CL kernel debugger:

Here are the messages that appeared when loading cl-opengl with (asdf:operate 'asdf:load-op :cl-glut-examples)

; loading system definition from C:/lispbox/packages/cl-opengl/cl-glut-examples.asd into #<Package "ASDF0"> ; registering #<SYSTEM CL-GLUT-EXAMPLES #x8A74C2E> as CL-GLUT-EXAMPLES ; loading system definition from C:/lispbox/packages/cl-opengl/cl-glut.asd into #<Package "ASDF0"> ; registering #<SYSTEM CL-GLUT #x8A9616E> as CL-GLUT ; loading system definition from C:/lispbox/packages/cl-opengl/cl-opengl.asd into #<Package "ASDF0"> ; registering #<SYSTEM CL-OPENGL #x8ABF966> as CL-OPENGL ; loading system definition from C:/lispbox/packages/cffi-090526/cffi.asd into #<Package "ASDF0"> ; registering #<SYSTEM CFFI #x8AC93F6> as CFFI ; loading system definition from C:/lispbox/packages/babel_0.3.0/babel.asd into #<Package "ASDF0"> ; registering #<SYSTEM BABEL #x8A6415E> as BABEL ; loading system definition from C:/lispbox/packages/alexandria/alexandria.asd into #<Package "ASDF0"> ; registering #<SYSTEM :ALEXANDRIA #x8A9F416> as ALEXANDRIA ; loading system definition from C:/lispbox/packages/trivial-features_0.4/trivial-features.asd into #<Package "ASDF0"> ; registering #<SYSTEM TRIVIAL-FEATURES #x8AB3456> as TRIVIAL-FEATURES ; loading system definition from C:/lispbox/packages/cl-opengl/cl-glu.asd into #<Package "ASDF0"> ; registering #<SYSTEM CL-GLU #x8B37FF6> as CL-GLU ; Warning: Don't know how to setup a hook before saving cores on this Lisp. ; While executing: #<Anonymous Function #x8D980EE>, in process listener(1). ;Compiler warnings for "C:/lispbox/packages/cl-opengl/glu/glu.lisp" : ; In CL-GLU:UN-PROJECT4: Undefined function CL-GLU::%GLUUNPROJECT4 ;Compiler warnings for "C:/lispbox/packages/cffi-090526/src/cffi-openmcl.lisp" : ; In CFFI-SYS:%CLOSE-FOREIGN-LIBRARY: Undefined function CLOSE-SHARED-LIBRARY NIL

Regards, Greg

Need a Holiday? Win a $10,000 Holiday of your choice. Enter now.http://us.lrd.yahoo.com/_ylc=X3oDMTJxN2x2ZmNpBF9zAzIwMjM2MTY2MTMEdG1fZG1lY2g...