[Openmcl-devel] problems defining callback in Clozure Common Lisp Version 1.4-dev-r12428M-trunk (WindowsX8664)

Matthew D. Swank akopa at charter.net
Sun Jul 19 15:55:01 PDT 2009


Thanks, that gets me started.

Matt

On Sun, 19 Jul 2009 15:42:32 -0600 (MDT)
Gary Byers <gb at clozure.com> wrote:

> The :DISCARD-STACK-ARGS argument to the callback isn't meaningful
> on win64; it should probably be ignored.
> 
> If you conditionalize it out via something like:
> 
> 
>          #+win32-target :discard-stack-args
> 
> and load the example and do (MAKE-SIMPLE-MS-WINDOW) ... well, I see a
> window appear in the upper left corner of the screen, but the height
> and width of its content area are 0; that looks like a bug in some
> part of the interface translation process.  (#$CW_USEDEFAULT should
> be #x80000000 - I'm not sure if that's signed or unsigned - but seems
> to have been garbled into 0.)
> 
> It does seem to be possible to resize the window and drag it around.
> 
> On Sun, 19 Jul 2009, Matthew D. Swank wrote:
> 
> > On Windows 7 RC when I "(require :mswin)", the following error
> > occurs:
> >
> > value NIL is not of the expected type (OR FIXNUM BIGNUM).
> >   [Condition of type TYPE-ERROR]
> >
> > Backtrace:
> >  0: (ASH NIL -3)
> >  1: (DEFINE-CALLBACK SIMPLE-WNDPROC (:DISCARD-STACK-ARGS :<HWND>
> >  HWND :<UINT> MSG :<WPARAM> ..)))
> >  2: (DEFCALLBACK (DEFCALLBACK SIMPLE-WNDPROC ..))

-- 
"You do not really understand something unless you can explain it to
your grandmother." -- Albert Einstein.


-- 
"You do not really understand something unless you can explain it to
your grandmother." -- Albert Einstein.



More information about the Openmcl-devel mailing list