URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [c-c++-common/] [dfp/] [convert-int-max-fold.c] - Blame information for rev 686

Details | Compare with Previous | View Log


/* { dg-options "-O2 -w" } */
 
/* N1150 5.1 Conversions from decimal float to integer.  */
 
/* Test decimal float to integer conversions for values at the limit of
   what will fit into the destination type.  This assumes 32-bit int and
   64-bit long long (there's a check for that below).  This version tests
   conversions during compilation.  */
 
#include "dfp-dbg.h"
 
extern void link_error (void);
 
void
doit ()
{
  _Decimal32 d32;
  _Decimal64 d64;
  _Decimal128 d128;
  int si;
  unsigned int ui;
  long long sll;
  unsigned long long ull;
 
  /* _Decimal32 to int.  */
 
  d32 = 2147483.E3DF;
  si = d32;
  if (si != 2147483000)
    link_error ();
 
  d32 = -2147483.E3DF;
  si = d32;
  if (si != -2147483000)
    link_error ();
 
  /* _Decimal32 to unsigned int.  */
 
  d32 = 4.294967E9DF;
  ui = d32;
  if (ui != 4294967000U)
    link_error ();
 
  /* _Decimal32 to long long.  */
 
  d32 = 922.3372E16DF;
  sll = d32;
  if (sll != 9223372000000000000LL)
    link_error ();
 
  d32 = -92233.72E14DF;
  sll = d32;
  if (sll != -9223372000000000000LL)
    link_error ();
 
  /* _Decimal32 to unsigned long long.  */
 
  d32 = 0.1844674E20DF;
  ull = d32;
  if (ull != 18446740000000000000ULL)
    link_error ();
 
  /* _Decimal64 to int.  */
 
  d64 = 2.147483647E9DD;
  si = d64;
  if (si != 2147483647)
    link_error ();
 
  d64 = -2147483648.DD;
  si = d64;
  if (si != -2147483648)
    link_error ();
 
  /* _Decimal64 to unsigned int.  */
 
  d64 = 42949.67295E5DD;
  ui = d64;
  if (ui != 4294967295)
    link_error ();
 
  /* _Decimal64 to long long.  */
 
  d64 = 9.223372036854775E18DD;
  sll = d64;
  if (sll != 9223372036854775000LL)
    link_error ();
 
  d64 = -92233720.36854775E11DD;
  sll = d64;
  if (sll != -9223372036854775000LL)
    link_error ();
 
  /* _Decimal64 to unsigned long long.  */
  d64 = 1844674407370955.E4DD;
  ull = d64;
  if (ull != 18446744073709550000ULL)
    link_error ();
 
  /* _Decimal128 to int.  */
 
  d128 = 2.147483647E9DL;
  si = d128;
  if (si != 2147483647)
    link_error ();
 
  d128 = -2147483648.DL;
  si = d128;
  if (si != -2147483648)
    link_error ();
 
  /* _Decimal128 to unsigned int.  */
 
  d128 = 4294.967295E6DL;
  ui = d128;
  if (ui != 4294967295)
    link_error ();
 
  /* _Decimal128 to long long.  */
 
  d128 = 9223372036854775807.DL;
  sll = d128;
  if (sll != 9223372036854775807LL)
    link_error ();
 
  d128 = -9.223372036854775808E19DL;
  sll = d128;
  if (sll != -9223372036854775807LL - 1LL)
    link_error ();
 
  /* _Decimal128 to unsigned long long.  */
  d128 = 18446744073709551615.DL;
  ull = d128;
  if (ull != 18446744073709551615ULL)
    link_error ();
}
 
int
main ()
{
  /* This test assumes 32-bit int and 64-bit long long.  */
 
  if (sizeof (int) != 4 || sizeof (long long) != 8)
    return 0;
 
  doit ();
  return 0;
}

Line No.	Rev	Author	Line
1	686	jeremybenn	`/* { dg-options "-O2 -w" } */`
2
3			`/* N1150 5.1 Conversions from decimal float to integer. */`
4
5			`/* Test decimal float to integer conversions for values at the limit of`
6			`what will fit into the destination type. This assumes 32-bit int and`
7			`64-bit long long (there's a check for that below). This version tests`
8			`conversions during compilation. */`
9
10			`#include "dfp-dbg.h"`
11
12			`extern void link_error (void);`
13
14			`void`
15			`doit ()`
16			`{`
17			`_Decimal32 d32;`
18			`_Decimal64 d64;`
19			`_Decimal128 d128;`
20			`int si;`
21			`unsigned int ui;`
22			`long long sll;`
23			`unsigned long long ull;`
24
25			`/* _Decimal32 to int. */`
26
27			`d32 = 2147483.E3DF;`
28			`si = d32;`
29			`if (si != 2147483000)`
30			`link_error ();`
31
32			`d32 = -2147483.E3DF;`
33			`si = d32;`
34			`if (si != -2147483000)`
35			`link_error ();`
36
37			`/* _Decimal32 to unsigned int. */`
38
39			`d32 = 4.294967E9DF;`
40			`ui = d32;`
41			`if (ui != 4294967000U)`
42			`link_error ();`
43
44			`/* _Decimal32 to long long. */`
45
46			`d32 = 922.3372E16DF;`
47			`sll = d32;`
48			`if (sll != 9223372000000000000LL)`
49			`link_error ();`
50
51			`d32 = -92233.72E14DF;`
52			`sll = d32;`
53			`if (sll != -9223372000000000000LL)`
54			`link_error ();`
55
56			`/* _Decimal32 to unsigned long long. */`
57
58			`d32 = 0.1844674E20DF;`
59			`ull = d32;`
60			`if (ull != 18446740000000000000ULL)`
61			`link_error ();`
62
63			`/* _Decimal64 to int. */`
64
65			`d64 = 2.147483647E9DD;`
66			`si = d64;`
67			`if (si != 2147483647)`
68			`link_error ();`
69
70			`d64 = -2147483648.DD;`
71			`si = d64;`
72			`if (si != -2147483648)`
73			`link_error ();`
74
75			`/* _Decimal64 to unsigned int. */`
76
77			`d64 = 42949.67295E5DD;`
78			`ui = d64;`
79			`if (ui != 4294967295)`
80			`link_error ();`
81
82			`/* _Decimal64 to long long. */`
83
84			`d64 = 9.223372036854775E18DD;`
85			`sll = d64;`
86			`if (sll != 9223372036854775000LL)`
87			`link_error ();`
88
89			`d64 = -92233720.36854775E11DD;`
90			`sll = d64;`
91			`if (sll != -9223372036854775000LL)`
92			`link_error ();`
93
94			`/* _Decimal64 to unsigned long long. */`
95			`d64 = 1844674407370955.E4DD;`
96			`ull = d64;`
97			`if (ull != 18446744073709550000ULL)`
98			`link_error ();`
99
100			`/* _Decimal128 to int. */`
101
102			`d128 = 2.147483647E9DL;`
103			`si = d128;`
104			`if (si != 2147483647)`
105			`link_error ();`
106
107			`d128 = -2147483648.DL;`
108			`si = d128;`
109			`if (si != -2147483648)`
110			`link_error ();`
111
112			`/* _Decimal128 to unsigned int. */`
113
114			`d128 = 4294.967295E6DL;`
115			`ui = d128;`
116			`if (ui != 4294967295)`
117			`link_error ();`
118
119			`/* _Decimal128 to long long. */`
120
121			`d128 = 9223372036854775807.DL;`
122			`sll = d128;`
123			`if (sll != 9223372036854775807LL)`
124			`link_error ();`
125
126			`d128 = -9.223372036854775808E19DL;`
127			`sll = d128;`
128			`if (sll != -9223372036854775807LL - 1LL)`
129			`link_error ();`
130
131			`/* _Decimal128 to unsigned long long. */`
132			`d128 = 18446744073709551615.DL;`
133			`ull = d128;`
134			`if (ull != 18446744073709551615ULL)`
135			`link_error ();`
136			`}`
137
138			`int`
139			`main ()`
140			`{`
141			`/* This test assumes 32-bit int and 64-bit long long. */`
142
143			`if (sizeof (int) != 4 \|\| sizeof (long long) != 8)`
144			`return 0;`
145
146			`doit ();`
147			`return 0;`
148			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [c-c++-common/] [dfp/] [convert-int-max-fold.c] - Blame information for rev 686