From: Janis Johnson <janis187@us.ibm.com>
Date: Fri, 5 Dec 2008 21:05:53 +0000 (+0000)
Subject: target-supports.exp (check_effective_target_hard_dfp): New.
X-Git-Tag: releases/gcc-4.4.0~1340
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=4f809983df5aff0181c6780a68a3d9359bc331db;p=thirdparty%2Fgcc.git

target-supports.exp (check_effective_target_hard_dfp): New.

	* lib/target-supports.exp (check_effective_target_hard_dfp): New.
	* gcc.dg/dfp/convert-dfp-round.c: Skip for hard_dfp.
	* gcc.dg/dfp/fe-binop.c: Ditto.
	* gcc.dg/dfp/fe-convert-1.c: Ditto.

From-SVN: r142494
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 6a0d2c6933d1..f4843d5b5075 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2008-12-05  Janis Johnson  <janis187@us.ibm.com>
+
+	* lib/target-supports.exp (check_effective_target_hard_dfp): New.
+	* gcc.dg/dfp/convert-dfp-round.c: Skip for hard_dfp.
+	* gcc.dg/dfp/fe-binop.c: Ditto.
+	* gcc.dg/dfp/fe-convert-1.c: Ditto.
+
 2008-12-05  Catherine Moore  <clm@codesourcery.com>
 
 	* gcc-target/mips/mips-nonpic: New testsuite.
diff --git a/gcc/testsuite/gcc.dg/dfp/convert-dfp-round.c b/gcc/testsuite/gcc.dg/dfp/convert-dfp-round.c
index 87867fad8b24..9833abb7ff0b 100644
--- a/gcc/testsuite/gcc.dg/dfp/convert-dfp-round.c
+++ b/gcc/testsuite/gcc.dg/dfp/convert-dfp-round.c
@@ -1,4 +1,5 @@
 /* { dg-options "-O0 -std=gnu99" } */
+/* { dg-skip-if "test is for emulation" { hard_dfp } { "*" } { "" } } */
 
 /* N1150 5.2: Conversions among decimal floating types and between
    decimal floating types and generic floating types.
diff --git a/gcc/testsuite/gcc.dg/dfp/fe-binop.c b/gcc/testsuite/gcc.dg/dfp/fe-binop.c
index 007bc6e44ddf..23f137818ed7 100644
--- a/gcc/testsuite/gcc.dg/dfp/fe-binop.c
+++ b/gcc/testsuite/gcc.dg/dfp/fe-binop.c
@@ -1,4 +1,5 @@
 /* { dg-options "-std=gnu99" } */
+/* { dg-skip-if "test is for emulation" { hard_dfp } { "*" } { "" } } */
 
 /* Touch tests that check for raising appropriate exceptions for binary
    arithmetic operations on decimal float values.  */
diff --git a/gcc/testsuite/gcc.dg/dfp/fe-convert-1.c b/gcc/testsuite/gcc.dg/dfp/fe-convert-1.c
index 6ea632d427f9..f65cf7870aec 100644
--- a/gcc/testsuite/gcc.dg/dfp/fe-convert-1.c
+++ b/gcc/testsuite/gcc.dg/dfp/fe-convert-1.c
@@ -1,4 +1,5 @@
 /* { dg-options "-std=gnu99" } */
+/* { dg-skip-if "test is for emulation" { hard_dfp } { "*" } { "" } } */
 
 /* Check that appropriate exceptions are raised for conversions involving
    decimal float values.  */
diff --git a/gcc/testsuite/lib/target-supports.exp b/gcc/testsuite/lib/target-supports.exp
index cc62a97ea7db..a297480a62a8 100644
--- a/gcc/testsuite/lib/target-supports.exp
+++ b/gcc/testsuite/lib/target-supports.exp
@@ -2656,3 +2656,12 @@ proc check_effective_target_pow10 { } {
 	}
     } "-lm" ]
 }
+
+# Return 1 if current options generate DFP instructions, 0 otherwise.
+
+proc check_effective_target_hard_dfp {} {
+    return [check_no_messages_and_pattern hard_dfp "!adddd3" assembly {
+	_Decimal64 x, y, z;
+	void foo (void) { z = x + y; }
+    }]
+}