On Sat, 20 Jun 2009 13:37:20 -0700, Nicolas Martyanoff <[email protected]>  
wrote:

> Hi,
>
> I'm considering using lisbuilder libs for one of my projects; it works
> fine for the moment, but SBCL 1.0.28 signals lot of warnings.
>
> While compiling lisbuilder-sdl:
>
> STYLE-WARNING: Undefined alien: "SDL_getenv"
> STYLE-WARNING: Undefined alien: "SDL_putenv"

A few users have complained about the SDL_getenv/putenv warnings. However  
I cannot duplicate this in SBCL, Lispworks or CLISP. Are you using the  
latest version of lispbulder-sdl from svn/asdf-install? Or did you  
download the archive from the site?

> ; file: /home/galdor/prog/lot/ext/lispbuilder-sdl/sdl/sdl-util.lisp
> ; in: DEFUN FLOOD-FILL-STACK-*
> ;     (RETURN-FROM LISPBUILDER-SDL:FLOOD-FILL-STACK-* NIL)
> ;
> ; note: deleting unreachable code
> ;
> ; note: deleting unreachable code
> ;
> ; note: deleting unreachable code
>

SBCL obviously knows something I don't. I'm not sure why it deletes code  
that should be reachable in certain circumstances. However, you shouldn't  
use flood-fill-stack as this will terminate Lispworks Personal due to the  
stack limitation in this free version.

The generic function warnings are harmless. I just have to go back and  
define the generic function before the defmethod.

>
> ; compiling (DEFUN PLAY-AUDIO ...)
> ; caught STYLE-WARNING:
> ;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL OBJ
> &KEY LOOP POS)

Valid Lisp code, just not normally done. I should probably change this as  
it makes it easy to trip when calling play-audio.

>
>
> While compiling a simple test:
>
> ; in: DEFUN ZONE-SHOW
> ;     (LISPBUILDER-SDL:WITH-EVENTS NIL (:QUIT-EVENT NIL T))
> ; --> LET SETF SETQ THE LAMBDA
> ; ==>
> ;   #'(LAMBDA () (DECLARE (IGNORABLE LISPBUILDER-SDL:RENDER-STATE)))
> ;
> ; caught STYLE-WARNING:
> ;   declaring unknown variable LISPBUILDER-SDL:RENDER-STATE to be
> ignored
>
> The code:
>
> (defun zone-show (zone)
>   "Show a zone in a SDL window."
>   (with-slots (name width height squares) zone
>     (let* ((dw (* width 16))
>            (dh (* height 16)))
>       (sdl:with-init (sdl:sdl-init-video)
>         (sdl:window dw dh :title-caption (format nil "Zone: ~a" name))
>         (sdl:with-events ()
>           (:quit-event () t))))))
>

This has been fixed in the version in svn.

> It's not that important, since the test works anyway, but I thought it
> may be useful to inform you about it :)

Thanks. One of my goals is to reduce warnings and notes to zero.

- Luke
_______________________________________________
application-builder mailing list
[email protected]
http://www.lispniks.com/mailman/listinfo/application-builder

Reply via email to