2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / gcc / testsuite / gcc.dg / ultrasp3.c
blob5156c17e82218390c27de914b26eb069d6e9b710
1 /* { dg-options "" } */
2 /* { dg-options "-mcpu=ultrasparc -mv8plus" { target sparc-*-* } } */
4 unsigned long long foo (unsigned long long x)
6 return 0x73500000735LL * x;
9 unsigned long long a, b;
10 unsigned long p;
12 unsigned long long bar (void)
14 unsigned long long c = a | b;
15 return 0x73500000735LL * c;
18 unsigned long long baz (void)
20 unsigned long long c = (p + 345) & -2;
21 return c * a;
24 main ()
26 if (foo (0x56789LL) != 0x26f32e5d26f32e5dLL)
27 abort ();
28 a = 0x8000000080000000LL;
29 b = 0x0000000180000001LL;
30 if (bar () != 0x120480000735LL)
31 abort ();
32 p = 0xffffffff;
33 if (baz () != 0xac00000000LL)
34 abort ();
35 exit (0);