diff options
author | Andreas Tobler <a.tobler@schweiz.ch> | 2005-02-23 14:56:01 +0100 |
---|---|---|
committer | Andreas Tobler <andreast@gcc.gnu.org> | 2005-02-23 14:56:01 +0100 |
commit | 1b05e8bf3c1c63c7d9b069e876aadcba0ced9a5f (patch) | |
tree | 8fb04e97a7e356e77d32e662bbecd26a156fe379 | |
parent | 3f9f087b7a44d61335765022fcac875d4ef8b42a (diff) | |
download | gcc-1b05e8bf3c1c63c7d9b069e876aadcba0ced9a5f.zip gcc-1b05e8bf3c1c63c7d9b069e876aadcba0ced9a5f.tar.gz gcc-1b05e8bf3c1c63c7d9b069e876aadcba0ced9a5f.tar.bz2 |
re PR libffi/20104 (gij fails on ppc and not on x86)
2005-02-23 Andreas Tobler <a.tobler@schweiz.ch>
PR libffi/20104
* testsuite/libffi.call/return_ll1.c: New test case.
From-SVN: r95454
-rw-r--r-- | libffi/ChangeLog | 5 | ||||
-rw-r--r-- | libffi/testsuite/libffi.call/return_ll1.c | 42 |
2 files changed, 47 insertions, 0 deletions
diff --git a/libffi/ChangeLog b/libffi/ChangeLog index be46054..6de6ef5 100644 --- a/libffi/ChangeLog +++ b/libffi/ChangeLog @@ -1,3 +1,8 @@ +2005-02-23 Andreas Tobler <a.tobler@schweiz.ch> + + PR libffi/20104 + * testsuite/libffi.call/return_ll1.c: New test case. + 2005-02-11 Janis Johnson <janis187@us.ibm.com> * testsuite/libffi.call/cls_align_longdouble.c: Remove dg-options. diff --git a/libffi/testsuite/libffi.call/return_ll1.c b/libffi/testsuite/libffi.call/return_ll1.c new file mode 100644 index 0000000..32fdfa1 --- /dev/null +++ b/libffi/testsuite/libffi.call/return_ll1.c @@ -0,0 +1,42 @@ +/* Area: ffi_call + Purpose: Check if long long are passed in the corresponding regs on ppc. + Limitations: none. + PR: 20104. + Originator: <andreast@gcc.gnu.org> 20050222 */ + +/* { dg-do run } */ +#include "ffitest.h" +static long long return_ll(int ll0, long long ll1, int ll2) +{ + return ll0 + ll1 + ll2; +} + +int main (void) +{ + ffi_cif cif; + ffi_type *args[MAX_ARGS]; + void *values[MAX_ARGS]; + long long rlonglong; + long long ll1; + unsigned ll0, ll2; + + args[0] = &ffi_type_uint32; + args[1] = &ffi_type_sint64; + args[2] = &ffi_type_uint32; + values[0] = &ll0; + values[1] = &ll1; + values[2] = &ll2; + + /* Initialize the cif */ + CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 3, + &ffi_type_sint64, args) == FFI_OK); + + ll0 = 11111111; + ll1 = 11111111111000LL; + ll2 = 11111111; + + ffi_call(&cif, FFI_FN(return_ll), &rlonglong, values); + printf("res: %lld, %lld\n", rlonglong, ll0 + ll1 + ll2); + /* { dg-output "res: 11111133333222, 11111133333222" } */ + exit(0); +} |