lispbuilder-sdl examples do not load on windows
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
SBCL |
Incomplete
|
Undecided
|
Unassigned |
Bug Description
I try to use the lispbuilder-
The packages do load, but starting an example (mandelbrot)
crashes sbcl.
; C:\Users\
es.asd
; into #<PACKAGE "ASDF0">
; registering #<SYSTEM LISPBUILDER-
; LISPBUILDER-
; compiling file "C:\\Users\
ackage.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:CL-USER)
; compiling (DEFPACKAGE #:LISPBUILDER-
; C:\Users\
\Lis\Documents\
; compilation finished in 0:00:00.033
; compiling file "C:\\Users\
lobals.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:SDL-MIXER-BIN)
; compiling (DEFVAR *DLL-PATH* ...)
; C:\Users\
\Lis\Documents\
; compilation finished in 0:00:00.035
; compiling file "C:\\Users\
package.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:CL-USER)
; compiling (DEFPACKAGE #:LISPBUILDER-
; C:\Users\
\Lis\Documents\
; compilation finished in 0:00:00.030
; compiling file "C:\\Users\
library.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:LISPBUILDER-
; compiling (PUSHNEW LISPBUILDER-
; compiling (DEFINE-
; compiling (DEFINE-
; compiling (DEFINE-
; compiling (DEFINE-
; compiling (DEFINE-
; compiling (DEFINE-
; compiling (DEFUN LOAD-LIBRARY ...)
; compiling (LOAD-LIBRARY)
; C:\Users\
\Lis\Documents\
; compilation finished in 0:00:00.062
; compiling file "C:\\Users\
mixer.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:SDL-MIXER-CFFI)
; compiling (DEFCLASS CHUNK ...)
; compiling (DEFCLASS MUSIC ...)
; C:\Users\
\Lis\Documents\
; compilation finished in 0:00:00.029
; compiling file "C:\\Users\
sdl-mixer.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:LISPBUILDER-
; compiling (DEFUN 1<< ...)
; compiling (DEFCTYPE MIX-CHUNK-FP ...)
; compiling (DEFCTYPE MIX-MUSIC-FP ...)
; compiling (DEFCONSTANT +SDL-MIXER-
; compiling (DEFCONSTANT +SDL-MIXER-
; compiling (DEFCONSTANT +SDL-MIXER-
; compiling (DEFCFUN ("Mix_Linked_
; compiling (DEFBITFIELD INIT-FLAGS ...)
; compiling (DEFCFUN ("Mix_FreeChunk" FREE-CHUNK) ...)
; compiling (DEFCFUN ("Mix_FreeMusic" FREE-MUSIC) ...)
; compiling (DEFUN SDL-MIXER-VERSION ...)
; compiling (DEFUN VERSION ...)
; compiling (DEFCONSTANT +DEFAULT-FORMAT+ ...)
; compiling (DEFUN LOAD-WAV ...)
; compiling (DEFUN PLAY-CHANNEL ...)
; compiling (DEFUN FADE-IN-CHANNEL ...)
; compiling (DEFUN GET-ERROR ...)
; compiling (DEFCONSTANT +CHANNELS+ ...)
; compiling (DEFCONSTANT +DEFAULT-FREQUENCY+ ...)
; compiling (DEFCONSTANT +DEFAULT-CHANNELS+ ...)
; compiling (DEFCONSTANT +MAX-VOLUME+ ...)
; compiling (DEFCSTRUCT CHUNK ...)
; compiling (DEFCENUM FADING ...)
; compiling (DEFCENUM MUSIC-TYPE ...)
; compiling (DEFCFUN ("Mix_OpenAudio" OPEN-AUDIO) ...)
; compiling (DEFCFUN ("Mix_AllocateC
; compiling (DEFCFUN ("Mix_QuerySpec" QUERY-SPEC) ...)
; compiling (DEFCFUN ("Mix_LoadWAV_RW" LOAD-WAV-RW) ...)
; compiling (DEFCFUN ("Mix_LoadMUS" LOAD-MUS) ...)
; compiling (DEFCFUN ("Mix_LoadMUS_RW" LOAD-MUS-RW) ...)
; compiling (DEFCFUN ("Mix_QuickLoad
; compiling (DEFCFUN ("Mix_QuickLoad
; compiling (DEFCFUN ("Mix_GetMusicType" GET-MUSIC-TYPE) ...)
; compiling (DEFCFUN ("Mix_SetPostMix" SET-POST-MIX) ...)
; compiling (DEFCFUN ("Mix_HookMusic" HOOK-MUSIC) ...)
; compiling (DEFCFUN ("Mix_HookMusic
; compiling (DEFCFUN ("Mix_GetMusicH
; compiling (DEFCFUN ("Mix_ChannelFi
; compiling (DEFCONSTANT +CHANNEL-POST+ ...)
; compiling (DEFCFUN ("Mix_RegisterE
; compiling (DEFCFUN ("Mix_Unregiste
; compiling (DEFCFUN ("Mix_Unregiste
; compiling (DEFCFUN ("Mix_SetPanning" SET-PANNING) ...)
; compiling (DEFCFUN ("Mix_SetPosition" SET-POSITION) ...)
; compiling (DEFCFUN ("Mix_SetDistance" SET-DISTANCE) ...)
; compiling (DEFCFUN ("Mix_SetRevers
; compiling (DEFCFUN ("Mix_ReserveCh
; compiling (DEFCFUN ("Mix_GroupChannel" GROUP-CHANNEL) ...)
; compiling (DEFCFUN ("Mix_GroupChan
; compiling (DEFCFUN ("Mix_GroupAvai
; compiling (DEFCFUN ("Mix_GroupCount" GROUP-COUNT) ...)
; compiling (DEFCFUN ("Mix_GroupOldest" GROUP-OLDEST) ...)
; compiling (DEFCFUN ("Mix_GroupNewer" GROUP-NEWER) ...)
; compiling (DEFCFUN ("Mix_PlayChann
; compiling (DEFCFUN ("Mix_PlayMusic" PLAY-MUSIC) ...)
; compiling (DEFCFUN ("Mix_FadeInMusic" FADE-IN-MUSIC) ...)
; compiling (DEFCFUN ("Mix_FadeInMus
; compiling (DEFCFUN ("Mix_FadeInCha
; compiling (DEFCFUN ("Mix_Volume" VOLUME) ...)
; compiling (DEFCFUN ("Mix_VolumeChunk" VOLUME-CHUNK) ...)
; compiling (DEFCFUN ("Mix_VolumeMusic" VOLUME-MUSIC) ...)
; compiling (DEFCFUN ("Mix_HaltChannel" HALT-CHANNEL) ...)
; compiling (DEFCFUN ("Mix_HaltGroup" HALT-GROUP) ...)
; compiling (DEFCFUN ("Mix_HaltMusic" HALT-MUSIC) ...)
; compiling (DEFCFUN ("Mix_ExpireCha
; compiling (DEFCFUN ("Mix_FadeOutCh
; compiling (DEFCFUN ("Mix_FadeOutGroup" FADE-OUT-GROUP) ...)
; compiling (DEFCFUN ("Mix_FadeOutMusic" FADE-OUT-MUSIC) ...)
; compiling (DEFCFUN ("Mix_FadingMusic" FADING-MUSIC) ...)
; compiling (DEFCFUN ("Mix_FadingCha
; compiling (DEFCFUN ("Mix_Pause" PAUSE) ...)
; compiling (DEFCFUN ("Mix_Resume" RESUME) ...)
; compiling (DEFCFUN ("Mix_Paused" PAUSED) ...)
; compiling (DEFCFUN ("Mix_PauseMusic" PAUSE-MUSIC) ...)
; compiling (DEFCFUN ("Mix_ResumeMusic" RESUME-MUSIC) ...)
; compiling (DEFCFUN ("Mix_RewindMusic" REWIND-MUSIC) ...)
; compiling (DEFCFUN ("Mix_PausedMusic" PAUSED-MUSIC) ...)
; compiling (DEFCFUN ("Mix_SetMusicP
; compiling (DEFCFUN ("Mix_Playing" PLAYING) ...)
; compiling (DEFCFUN ("Mix_PlayingMusic" PLAYING-MUSIC) ...)
; compiling (DEFCFUN ("Mix_SetMusicCMD" SET-MUSIC-CMD) ...)
; compiling (DEFCFUN ("Mix_SetSynchr
; compiling (DEFCFUN ("Mix_GetSynchr
; compiling (DEFCFUN ("Mix_GetChunk" GET-CHUNK) ...)
; compiling (DEFCFUN ("Mix_CloseAudio" CLOSE-AUDIO) ...)
; C:\Users\
\Lis\Documents\
; compilation finished in 0:00:00.835
; compiling file "C:\\Users\
translate.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:SDL-MIXER-CFFI)
; compiling (DEFUN TO-MIX-CHUNK ...)
; compiling (DEFUN TO-MIX-MUSIC ...)
; C:\Users\
\Lis\Documents\
; compilation finished in 0:00:00.032
; compiling file "C:\\Users\
xer\\package.lisp" (written 30 JUL 2010 03:48:10 AM):
; compiling (IN-PACKAGE #:CL-USER)
; compiling (DEFPACKAGE #:LISPBUILDER-
; C:\Users\
\Lis\Documents\
n
; compilation finished in 0:00:00.032
; compiling file "C:\\Users\
xer\\globals.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:SDL-MIXER)
; compiling (DEFVAR *DEFAULT-MUSIC* ...)
; compiling (DEFVAR *DEFAULT-CHUNK* ...)
; compiling (DEFVAR *CHANNEL-FINISHED* ...)
; compiling (DEFVAR *MUSIC-FINISHED* ...)
; compiling (DEFVAR *AUDIO-BUFFER* ...)
; compiling (DEFVAR *CALLBACK-P* ...)
; compiling (DEFPARAMETER *ENABLE-CALLBACKS* ...)
; C:\Users\
\Lis\Documents\
n
; compilation finished in 0:00:00.048
; compiling file "C:\\Users\
xer\\mixer.lisp" (written 30 JUL 2010 03:48:11 AM):
; compiling (IN-PACKAGE #:SDL-MIXER)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (DEFVAR *BASE-AUDIO-
; compiling (DEFCONSTANT +DEFAULT-
; compiling (DEFUN MIXER-LIBRARY-
; compiling (DEFUN MIXER-GLUE-VERSION ...)
; compiling (DEFUN LOAD-LIBRARY ...)
; compiling (DEFUN MIXER-INIT-P ...)
; compiling (DEFUN INIT-MIXER ...)
; compiling (DEFUN QUIT-MIXER ...)
; compiling (DEFUN GET-NUMBER-
; compiling (DEFUN GET-SAMPLE-DECODER ...)
; compiling (DEFUN GET-NUMBER-
; compiling (DEFUN GET-MUSIC-DECODER ...)
; compiling (DEFUN RESERVE-CHANNELS ...)
; compiling (DEFMETHOD LOAD-MUSIC ...)
; compiling (DEFMETHOD LOAD-MUSIC ...)
; compiling (DEFMETHOD LOAD-MUSIC ...)
; compiling (DEFMETHOD LOAD-MUSIC ...)
; compiling (DEFMETHOD LOAD-SAMPLE ...)
; compiling (DEFMETHOD LOAD-SAMPLE ...)
; compiling (DEFMETHOD LOAD-SAMPLE ...)
; compiling (DEFMETHOD LOAD-SAMPLE ...)
; compiling (DEFUN SAMPLE-FROM-CHANNEL ...)
; compiling (DEFUN OPEN-AUDIO ...)
; compiling (DEFUN CLOSE-AUDIO ...)
; compiling (DEFUN PLAY-MUSIC ...)
; compiling (DEFUN PLAY-SAMPLE ...)
; compiling (DEFUN HALT-MUSIC ...)
; compiling (DEFUN HALT-SAMPLE ...)
; compiling (DEFUN LINKED-VERSION ...)
; compiling (DEFUN QUERY-SPEC ...)
; compiling (DEFUN AUDIO-FREQUENCY-P ...)
; compiling (DEFUN AUDIO-FORMAT-P ...)
; compiling (DEFUN AUDIO-CHANNELS-P ...)
; compiling (DEFUN AUDIO-OPENED-P ...)
; compiling (DEFUN SAMPLE-VOLUME ...)
; compiling (DEFUN (SETF SAMPLE-VOLUME) ...)
; compiling (DEFUN CHANNEL-VOLUME ...)
; compiling (DEFUN (SETF CHANNEL-VOLUME) ...)
; compiling (DEFUN MUSIC-VOLUME ...)
; compiling (DEFUN (SETF MUSIC-VOLUME) ...)
; compiling (DEFMETHOD FREE ...)
; compiling (DEFMETHOD FREE ...)
; compiling (DEFUN SAMPLE-PLAYING-P ...)
; compiling (DEFUN SAMPLE-HALTED-P ...)
; compiling (DEFUN MUSIC-PLAYING-P ...)
; compiling (DEFUN MUSIC-HALTED-P ...)
; compiling (DEFUN SAMPLE-PAUSED-P ...)
; compiling (DEFUN MUSIC-PAUSED-P ...)
; compiling (DEFUN SAMPLE-FADING-P ...)
; compiling (DEFUN MUSIC-FADING-P ...)
; compiling (DEFUN PAUSE-MUSIC ...)
; compiling (DEFUN PAUSE-SAMPLE ...)
; compiling (DEFUN RESUME-MUSIC ...)
; compiling (DEFUN RESUME-SAMPLE ...)
; compiling (DEFUN REWIND-MUSIC ...)
; compiling (DEFUN MUSIC-POSITION ...)
; compiling (DEFUN MUSIC-TYPE-P ...)
; compiling (DEFUN MUSIC-TYPE-OF ...)
; compiling (DEFUN ALLOCATE-CHANNELS ...)
; compiling (DEFUN DEALLOCATE-
; compiling (DEFCALLBACK CHANNEL-
; compiling (DEFUN REGISTER-
; compiling (DEFUN UNREGISTER-
; compiling (DEFUN REGISTER-
; compiling (DEFUN UNREGISTER-
; compiling (DEFCALLBACK MUSIC-FINISHED-PROC ...)
; compiling (DEFUN REGISTER-
; compiling (DEFUN UNREGISTER-
; compiling (DEFUN REGISTER-
; compiling (DEFUN UNREGISTER-
; compiling (DEFCALLBACK FILL-AUDIO-BUFFER ...)
; compiling (DEFUN REGISTER-
; compiling (DEFUN UNREGISTER-
; compiling (DEFUN GROUP-CHANNELS ...)
; compiling (DEFUN GROUP-CHANNEL-P ...)
; compiling (DEFUN GROUP-AVAILABLE ...)
; compiling (DEFUN GROUP-OLDEST ...)
; compiling (DEFUN GROUP-RECENT ...)
; C:\Users\
\Lis\Documents\
; compilation finished in 0:00:00.511
WARNING:
discarding unsupported DOCUMENTATION of type STANDARD-CLASS for object SYMBOL
WARNING:
discarding unsupported DOCUMENTATION of type STANDARD-CLASS for object SYMBOL
STYLE-WARNING: Implicitly creating new generic function LOAD-MUSIC.
STYLE-WARNING: Implicitly creating new generic function LOAD-SAMPLE.
STYLE-WARNING: Implicitly creating new generic function FREE.
* (asdf:operate 'asdf:load-op :lispbuilder-
; loading system definition from
; C:\Users\
; #<PACKAGE "ASDF0">
; registering #<SYSTEM LISPBUILDER-
debugger invoked on a SIMPLE-ERROR: EXCEPTION_
Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL.
restarts (invokable by number or by possibly-
0: [ABORT] Exit debugger, returning to top level.
("bogus stack frame")
0]
WARNING: Starting a select without a timeout while interrupts are disabled.
Changed in sbcl: | |
status: | New → Incomplete |
I am unable to reproduce this using sbcl-1. 0.37-windows- x86 and the latest version of lispbuilder-sdl from the repository. The Mandelbrot example works fine for me.
What version of lispbuilder-sdl was used?