diff options
| author | andreast <andreast@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-02-23 13:56:01 +0000 |
|---|---|---|
| committer | andreast <andreast@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-02-23 13:56:01 +0000 |
| commit | 4f373876375120908a52eb4b56e38418e3d52a5b (patch) | |
| tree | 8fb04e97a7e356e77d32e662bbecd26a156fe379 | |
| parent | a3d20cbb2a2fc6cb46fa17463efa6fb57cb32e65 (diff) | |
| download | ppe42-gcc-4f373876375120908a52eb4b56e38418e3d52a5b.tar.gz ppe42-gcc-4f373876375120908a52eb4b56e38418e3d52a5b.zip | |
2005-02-23 Andreas Tobler <a.tobler@schweiz.ch>
PR libffi/20104
* testsuite/libffi.call/return_ll1.c: New test case.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@95454 138bc75d-0d04-0410-961f-82ee72b054a4
| -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 be46054b817..6de6ef538be 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 00000000000..32fdfa122ff --- /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); +} |
