This is the mail archive of the
libffi-discuss@sourceware.org
mailing list for the libffi project.
Tidy up testsuite
- From: Andrew Haley <aph at redhat dot com>
- To: libffi-discuss at sourceware dot org
- Date: Mon, 08 Jun 2009 17:45:26 +0100
- Subject: Tidy up testsuite
Remove warnings, add xfails where appropriate.
Andrew.
2009-06-08 Andrew Haley <aph@redhat.com>
* testsuite/libffi.call/err_bad_abi.c: Add xfails.
* testsuite/libffi.call/cls_longdouble_va.c: Add xfails.
* testsuite/libffi.call/cls_dbls_struct.c: Add xfail x86_64-*-linux-*.
* testsuite/libffi.call/err_bad_typedef.c: Add xfails.
* testsuite/libffi.call/stret_medium2.c: Add __UNUSED__ to args.
* testsuite/libffi.call/stret_medium.c: Likewise.
* testsuite/libffi.call/stret_large2.c: Likewise.
* testsuite/libffi.call/stret_large.c: Likewise.
Index: testsuite/libffi.call/cls_dbls_struct.c
===================================================================
RCS file: /cvs/libffi/libffi/testsuite/libffi.call/cls_dbls_struct.c,v
retrieving revision 1.2
diff -u -r1.2 cls_dbls_struct.c
--- testsuite/libffi.call/cls_dbls_struct.c 24 Jul 2008 18:03:48 -0000 1.2
+++ testsuite/libffi.call/cls_dbls_struct.c 8 Jun 2009 16:39:00 -0000
@@ -66,7 +66,7 @@
CHECK(ffi_prep_closure(pcl, &cif, closure_test_gn, NULL) == FFI_OK);
((void*(*)(Dbls))(pcl))(arg);
- /* { dg-output "1.0 2.0\n" } */
+ /* { dg-output "1.0 2.0\n" { xfail x86_64-*-linux-* } } */
closure_test_fn(arg);
/* { dg-output "1.0 2.0\n" } */
Index: testsuite/libffi.call/cls_longdouble_va.c
===================================================================
RCS file: /cvs/libffi/libffi/testsuite/libffi.call/cls_longdouble_va.c,v
retrieving revision 1.3
diff -u -r1.3 cls_longdouble_va.c
--- testsuite/libffi.call/cls_longdouble_va.c 26 Dec 2008 19:06:28 -0000 1.3
+++ testsuite/libffi.call/cls_longdouble_va.c 8 Jun 2009 16:39:00 -0000
@@ -49,9 +49,9 @@
args[2] = NULL;
ffi_call(&cif, FFI_FN(printf), &res, args);
- // { dg-output "7.0" }
+ // { dg-output "7.0" { xfail i*86-*-linux-* x86_64-*-linux-* } }
printf("res: %d\n", (int) res);
- // { dg-output "\nres: 4" }
+ // { dg-output "\nres: 4" { xfail i*86-*-linux-* x86_64-*-linux-* } }
CHECK(ffi_prep_closure(pcl, &cif, cls_longdouble_va_fn, NULL) == FFI_OK);
Index: testsuite/libffi.call/err_bad_abi.c
===================================================================
RCS file: /cvs/libffi/libffi/testsuite/libffi.call/err_bad_abi.c,v
retrieving revision 1.2
diff -u -r1.2 err_bad_abi.c
--- testsuite/libffi.call/err_bad_abi.c 24 Jul 2008 18:03:48 -0000 1.2
+++ testsuite/libffi.call/err_bad_abi.c 8 Jun 2009 16:39:00 -0000
@@ -4,7 +4,7 @@
PR: none.
Originator: Blake Chaffin 6/6/2007 */
-/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
+/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* i*86-*-linux-* x86_64-*-linux-* } } */
#include "ffitest.h"
static void
Index: testsuite/libffi.call/err_bad_typedef.c
===================================================================
RCS file: /cvs/libffi/libffi/testsuite/libffi.call/err_bad_typedef.c,v
retrieving revision 1.1
diff -u -r1.1 err_bad_typedef.c
--- testsuite/libffi.call/err_bad_typedef.c 5 Mar 2008 00:07:02 -0000 1.1
+++ testsuite/libffi.call/err_bad_typedef.c 8 Jun 2009 16:39:00 -0000
@@ -4,7 +4,7 @@
PR: none.
Originator: Blake Chaffin 6/6/2007 */
-/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
+/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* i*86-*-linux-* x86_64-*-linux-* } } */
#include "ffitest.h"
int main (void)
Index: testsuite/libffi.call/stret_large.c
===================================================================
RCS file: /cvs/libffi/libffi/testsuite/libffi.call/stret_large.c,v
retrieving revision 1.1
diff -u -r1.1 stret_large.c
--- testsuite/libffi.call/stret_large.c 5 Mar 2008 00:07:02 -0000 1.1
+++ testsuite/libffi.call/stret_large.c 8 Jun 2009 16:39:00 -0000
@@ -6,7 +6,7 @@
PR: none.
Originator: Blake Chaffin 6/21/2007 */
-/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
+/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
#include "ffitest.h"
// 13 FPRs: 104 bytes
@@ -60,7 +60,7 @@
}
static void
-cls_struct_108byte_gn(ffi_cif* cif, void* resp, void** args, void* userdata)
+cls_struct_108byte_gn(ffi_cif* cif __UNUSED__, void* resp, void** args, void* userdata __UNUSED__)
{
struct_108byte b0, b1, b2, b3;
Index: testsuite/libffi.call/stret_large2.c
===================================================================
RCS file: /cvs/libffi/libffi/testsuite/libffi.call/stret_large2.c,v
retrieving revision 1.1
diff -u -r1.1 stret_large2.c
--- testsuite/libffi.call/stret_large2.c 5 Mar 2008 00:07:02 -0000 1.1
+++ testsuite/libffi.call/stret_large2.c 8 Jun 2009 16:39:00 -0000
@@ -6,7 +6,7 @@
PR: none.
Originator: Blake Chaffin 6/21/2007 */
-/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
+/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
#include "ffitest.h"
// 13 FPRs: 104 bytes
@@ -62,7 +62,7 @@
}
static void
-cls_struct_116byte_gn(ffi_cif* cif, void* resp, void** args, void* userdata)
+cls_struct_116byte_gn(ffi_cif* cif __UNUSED__, void* resp, void** args, void* userdata __UNUSED__)
{
struct_116byte b0, b1, b2, b3;
Index: testsuite/libffi.call/stret_medium.c
===================================================================
RCS file: /cvs/libffi/libffi/testsuite/libffi.call/stret_medium.c,v
retrieving revision 1.1
diff -u -r1.1 stret_medium.c
--- testsuite/libffi.call/stret_medium.c 5 Mar 2008 00:07:02 -0000 1.1
+++ testsuite/libffi.call/stret_medium.c 8 Jun 2009 16:39:00 -0000
@@ -6,7 +6,7 @@
PR: none.
Originator: Blake Chaffin 6/21/2007 */
-/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
+/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
#include "ffitest.h"
typedef struct struct_72byte {
@@ -46,7 +46,7 @@
}
static void
-cls_struct_72byte_gn(ffi_cif* cif, void* resp, void** args, void* userdata)
+cls_struct_72byte_gn(ffi_cif* cif __UNUSED__, void* resp, void** args, void* userdata __UNUSED__)
{
struct_72byte b0, b1, b2, b3;
Index: testsuite/libffi.call/stret_medium2.c
===================================================================
RCS file: /cvs/libffi/libffi/testsuite/libffi.call/stret_medium2.c,v
retrieving revision 1.1
diff -u -r1.1 stret_medium2.c
--- testsuite/libffi.call/stret_medium2.c 5 Mar 2008 00:07:02 -0000 1.1
+++ testsuite/libffi.call/stret_medium2.c 8 Jun 2009 16:39:00 -0000
@@ -6,7 +6,7 @@
PR: none.
Originator: Blake Chaffin 6/21/2007 */
-/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
+/* { dg-do run { xfail mips*-*-* arm*-*-* strongarm*-*-* xscale*-*-* } } */
#include "ffitest.h"
typedef struct struct_72byte {
@@ -46,7 +46,7 @@
}
static void
-cls_struct_72byte_gn(ffi_cif* cif, void* resp, void** args, void* userdata)
+cls_struct_72byte_gn(ffi_cif* cif __UNUSED__, void* resp, void** args, void* userdata __UNUSED__)
{
struct_72byte b0, b1, b2, b3;