Re: fixed 133 (Re: [Sbcl-devel] DEF-ALIEN-ROUTINE problem)

[William H. N. <wil...@ai...>]

On Thu, Jan 24, 2002 at 11:46:20AM +0000, Daniel Barlow wrote:
> If the fix is somewhat kludgey (I make no judgement, I haven't looked
> at it), that suggests you might be revisiting the code sometime.
> Here, have a test case.
> 
> Index: alien.impure.lisp
> ===================================================================
> RCS file: /cvsroot/sbcl/sbcl/tests/alien.impure.lisp,v
> retrieving revision 1.2
> diff -u -r1.2 alien.impure.lisp
> --- alien.impure.lisp   2001/05/07 20:16:22     1.2
> +++ alien.impure.lisp   2002/01/24 11:42:48
> @@ -23,5 +23,11 @@
>  (setf (sb-alien:extern-alien "current_control_stack_pointer" sb-alien:unsigned)
>        (sb-alien:extern-alien "current_control_stack_pointer" sb-alien:unsigned))
>  
> +;;; somewhere between sbcl 0.6.13 and 0.7, void returns broke with
> +;;; "unable to use values types here": see bug 133.  Fixed in 0.7.0.5
> +
> +(sb-alien:def-alien-routine ("free" free) void (ptr (* t) :in))
> +
> +
>  ;;; success
>  (quit :unix-status 104)

OK, thanks, it's in 0.7.0.8 now.

-- 
William Harold Newman <wil...@ai...>
"Look on my works, ye Mighty, and despair!" -- Ozymandias, King of Kings 
PGP key fingerprint 85 CE 1C BA 79 8D 51 8C  B9 25 FB EE E0 C3 E5 7C