[Openmcl-devel] signedness issue in %ffcall on ppc

[Julian Squires]

Hi,

Given the following example:

(asdf:oos 'asdf:load-op :cffi)
(cffi:defcfun "srandom" :void (seed :unsigned-int))
(srandom #x80000000)

with Clozure Common Lisp Version 1.3-r11936  (LinuxPPC32) I receive
the following error:

> Error: value 2147483648 is not of the expected type (SIGNED-BYTE 32).
> While executing: %FF-CALL, in process listener(1).

The attached patch (to level-0/PPC/ppc-def.lisp) appears to correct this issue.

Cheers,

-- 
Julian Squires
-------------- next part --------------
A non-text attachment was scrubbed...
Name: ccl-level-0-unsigned-long.patch
Type: text/x-diff
Size: 810 bytes
Desc: not available
URL: <https://lists.clozure.com/pipermail/openmcl-devel/attachments/20090507/4e09c9c8/attachment.bin>