From 554fd8c5195424bdbcabf5de30fdc183aba391bd Mon Sep 17 00:00:00 2001
From: upstream source tree <ports@midipix.org>
Date: Sun, 15 Mar 2015 20:14:05 -0400
Subject: obtained gcc-4.6.4.tar.bz2 from upstream website; verified
 gcc-4.6.4.tar.bz2.sig; imported gcc-4.6.4 source tree from verified upstream
 tarball.

downloading a git-generated archive based on the 'upstream' tag
should provide you with a source tree that is binary identical
to the one extracted from the above tarball.

if you have obtained the source via the command 'git clone',
however, do note that line-endings of files in your working
directory might differ from line-endings of the respective
files in the upstream repository.
---
 gcc/testsuite/c-c++-common/dfp/operator-unary.c | 52 +++++++++++++++++++++++++
 1 file changed, 52 insertions(+)
 create mode 100644 gcc/testsuite/c-c++-common/dfp/operator-unary.c

(limited to 'gcc/testsuite/c-c++-common/dfp/operator-unary.c')

diff --git a/gcc/testsuite/c-c++-common/dfp/operator-unary.c b/gcc/testsuite/c-c++-common/dfp/operator-unary.c
new file mode 100644
index 000000000..65f0be074
--- /dev/null
+++ b/gcc/testsuite/c-c++-common/dfp/operator-unary.c
@@ -0,0 +1,52 @@
+/* C99 6.5.3 Unary operators.  */
+
+#include "dfp-dbg.h"
+
+#define AUTO_INCREASE_DECREASE(TYPE,SUFFIX)   		\
+do                                            		\
+{                                             		\
+  _Decimal##TYPE in_de_d##TYPE = 0.0##SUFFIX;		\
+  if (in_de_d##TYPE++) FAILURE				\
+  if (--in_de_d##TYPE) FAILURE				\
+  if (++in_de_d##TYPE == 0.0##SUFFIX) FAILURE		\
+  if (in_de_d##TYPE-- == 0.0##SUFFIX) FAILURE		\
+} while(0)
+
+#define UNARY_OPERATOR(TYPE,SUFFIX)           		\
+do                                            		\
+{                                             		\
+ _Decimal##TYPE unary_d##TYPE = 1.0##SUFFIX;		\
+ _Decimal##TYPE* unary_dp##TYPE;              		\
+ /*  & operator.  */                          		\
+ unary_dp##TYPE = &(unary_d##TYPE);           		\
+ /*  * operator.  */                          		\
+ unary_d##TYPE = *(unary_dp##TYPE);           		\
+ /*  - operator.  */                          		\
+ unary_d##TYPE = -unary_d##TYPE;              		\
+ if (unary_d##TYPE != -1.0##SUFFIX) FAILURE		\
+ /*  + operator.  */                          		\
+ unary_d##TYPE = +unary_d##TYPE;              		\
+ if (unary_d##TYPE != -1.0##SUFFIX) FAILURE		\
+ if (!unary_d##TYPE) FAILURE	/*! operator.  */ 	\
+} while (0)
+
+int
+main ()
+{
+  /*  C99 6.5.3.1 Prefix increment and decrement operators. */
+  AUTO_INCREASE_DECREASE(32, DF);
+  AUTO_INCREASE_DECREASE(64, DD);
+  AUTO_INCREASE_DECREASE(128, DL);
+
+  /*  C99 6.5.3 Unary operators.  */
+  UNARY_OPERATOR(32, DF);
+  UNARY_OPERATOR(64, DD);
+  UNARY_OPERATOR(128, DL);
+
+  /*  C99 6.5.3 Unary operators for zero values.  */
+  if (- +0.df != -0.df) FAILURE
+  if (+ -0.df != -0.df) FAILURE
+  if (- -0.df != +0.df) FAILURE
+
+  FINISH
+}
-- 
cgit v1.2.3