summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.c-torture/execute/longlong.c
diff options
context:
space:
mode:
authorupstream source tree <ports@midipix.org>2015-03-15 20:14:05 -0400
committerupstream source tree <ports@midipix.org>2015-03-15 20:14:05 -0400
commit554fd8c5195424bdbcabf5de30fdc183aba391bd (patch)
tree976dc5ab7fddf506dadce60ae936f43f58787092 /gcc/testsuite/gcc.c-torture/execute/longlong.c
downloadcbb-gcc-4.6.4-554fd8c5195424bdbcabf5de30fdc183aba391bd.tar.bz2
cbb-gcc-4.6.4-554fd8c5195424bdbcabf5de30fdc183aba391bd.tar.xz
obtained gcc-4.6.4.tar.bz2 from upstream website;upstream
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.
Diffstat (limited to 'gcc/testsuite/gcc.c-torture/execute/longlong.c')
-rw-r--r--gcc/testsuite/gcc.c-torture/execute/longlong.c39
1 files changed, 39 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.c-torture/execute/longlong.c b/gcc/testsuite/gcc.c-torture/execute/longlong.c
new file mode 100644
index 000000000..56f1d8eab
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/longlong.c
@@ -0,0 +1,39 @@
+/* Source: PR 321 modified for test suite by Neil Booth 14 Jan 2001. */
+
+typedef unsigned long long uint64;
+unsigned long pars;
+
+uint64 b[32];
+uint64 *r = b;
+
+void alpha_ep_extbl_i_eq_0()
+{
+ unsigned int rb, ra, rc;
+
+ rb = (((unsigned long)(pars) >> 27)) & 0x1fUL;
+ ra = (((unsigned int)(pars) >> 5)) & 0x1fUL;
+ rc = (((unsigned int)(pars) >> 0)) & 0x1fUL;
+ {
+ uint64 temp = ((r[ra] >> ((r[rb] & 0x7) << 3)) & 0x00000000000000FFLL);
+ if (rc != 31)
+ r[rc] = temp;
+ }
+}
+
+int
+main(void)
+{
+ if (sizeof (uint64) == 8)
+ {
+ b[17] = 0x0000000000303882ULL; /* rb */
+ b[2] = 0x534f4f4c494d000aULL; /* ra & rc */
+
+ pars = 0x88000042; /* 17, 2, 2 coded */
+ alpha_ep_extbl_i_eq_0();
+
+ if (b[2] != 0x4d)
+ abort ();
+ }
+
+ exit (0);
+}