[Cffi-devel] Casting variables and functions

[Stelian Ionescu]

On Sun, 2014-03-30 at 06:59 -0700, Joeish W wrote:
> This is the way I thought you did it but I'm running this and it's not
> working: 
> 
>     (with-foreign-object (float :float)
>      
>                (setf float 6)
>          (type-of float))
> 
>      >(INTEGER 0 4611686018427387903)
> 
> The output says it is an integer
> 
> I tried this:
> 
> 
>         (with-foreign-object (float :float)
>              
>                     (setf (mem-ref float :float) 4)
>                  (type-of (mem-ref float :float)))

(with-foreign-object (float :float)
  (setf (mem-ref float :float)
        (coerce 4 'single-float))
  (mem-ref float :float))

or use the syntax 4.0s0 for a literal single-float(4.0d0 is a literal
double in comparison).

-- 
Stelian Ionescu a.k.a. fe[nl]ix
Quidquid latine dictum sit, altum videtur.

-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 198 bytes
Desc: This is a digitally signed message part
URL: <https://mailman.common-lisp.net/pipermail/cffi-devel/attachments/20140330/7e532ac6/attachment.sig>