From f93a40eaa321c7c6cd47790dd30ddb774d33d8ed Mon Sep 17 00:00:00 2001 From: John David Anglin Date: Mon, 14 Dec 2009 02:42:18 +0000 Subject: ffi.c (ffi_closure_inner_pa32): Handle FFI_TYPE_LONGDOUBLE type on HP-UX. * src/pa/ffi.c (ffi_closure_inner_pa32): Handle FFI_TYPE_LONGDOUBLE type on HP-UX. From-SVN: r155205 --- libffi/src/pa/ffi.c | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'libffi/src') diff --git a/libffi/src/pa/ffi.c b/libffi/src/pa/ffi.c index c7a1435..6d7606f 100644 --- a/libffi/src/pa/ffi.c +++ b/libffi/src/pa/ffi.c @@ -492,6 +492,13 @@ ffi_status ffi_closure_inner_pa32(ffi_closure *closure, UINT32 *stack) avalue[i] = (void *)(stack - slot); break; +#ifdef PA_HPUX + case FFI_TYPE_LONGDOUBLE: + /* Long doubles are treated like a big structure. */ + avalue[i] = (void *) *(stack - slot); + break; +#endif + case FFI_TYPE_STRUCT: /* Structs smaller or equal than 4 bytes are passed in one register. Structs smaller or equal 8 bytes are passed in two -- cgit v1.1