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/gcc.c-torture/execute/20041011-1.c | 60 ++++++++++++++++++++++++
 1 file changed, 60 insertions(+)
 create mode 100644 gcc/testsuite/gcc.c-torture/execute/20041011-1.c

(limited to 'gcc/testsuite/gcc.c-torture/execute/20041011-1.c')

diff --git a/gcc/testsuite/gcc.c-torture/execute/20041011-1.c b/gcc/testsuite/gcc.c-torture/execute/20041011-1.c
new file mode 100644
index 000000000..4524de943
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/20041011-1.c
@@ -0,0 +1,60 @@
+typedef unsigned long long ull;
+volatile int gvol[32];
+ull gull;
+
+#define MULTI(X) \
+	X( 1), X( 2), X( 3), X( 4), X( 5), X( 6), X( 7), X( 8), X( 9), X(10), \
+	X(11), X(12), X(13), X(14), X(15), X(16), X(17), X(18), X(19), X(20), \
+	X(21), X(22), X(23), X(24), X(25), X(26), X(27), X(28), X(29), X(30)
+
+#define DECLARE(INDEX) x##INDEX
+#define COPYIN(INDEX) x##INDEX = gvol[INDEX]
+#define COPYOUT(INDEX) gvol[INDEX] = x##INDEX
+
+#define BUILD_TEST(NAME, N)		\
+  ull __attribute__((noinline))		\
+  NAME (int n, ull x)			\
+  {					\
+    while (n--)				\
+      {					\
+	int MULTI (DECLARE);		\
+	MULTI (COPYIN);			\
+	MULTI (COPYOUT);		\
+	x += N;				\
+      }					\
+    return x;				\
+  }
+
+#define RUN_TEST(NAME, N)		\
+  if (NAME (3, ~0ULL) != N * 3 - 1)	\
+    abort ();				\
+  if (NAME (3, 0xffffffffULL)		\
+      != N * 3 + 0xffffffffULL)		\
+    abort ();
+
+#define DO_TESTS(DO_TEST)	\
+  DO_TEST (t1, -2048)		\
+  DO_TEST (t2, -513)		\
+  DO_TEST (t3, -512)		\
+  DO_TEST (t4, -511)		\
+  DO_TEST (t5, -1)		\
+  DO_TEST (t6, 1)		\
+  DO_TEST (t7, 511)		\
+  DO_TEST (t8, 512)		\
+  DO_TEST (t9, 513)		\
+  DO_TEST (t10, gull)		\
+  DO_TEST (t11, -gull)
+
+DO_TESTS (BUILD_TEST)
+
+ull neg (ull x) { return -x; }
+
+int
+main ()
+{
+  gull = 100;
+  DO_TESTS (RUN_TEST)
+  if (neg (gull) != -100ULL)
+    abort ();
+  exit (0);
+}
-- 
cgit v1.2.3