OSDN Git Service

* testsuite/decimal/binary-arith.cc: Fix directive to skip test.
[pf3gnuchains/gcc-fork.git] / libstdc++-v3 / testsuite / decimal / conversion-to-integral.cc
1 // Copyright (C) 2009 Free Software Foundation, Inc.
2 //
3 // This file is part of the GNU ISO C++ Library.  This library is free
4 // software; you can redistribute it and/or modify it under the
5 // terms of the GNU General Public License as published by the
6 // Free Software Foundation; either version 3, or (at your option)
7 // any later version.
8
9 // This library is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 // GNU General Public License for more details.
13
14 // You should have received a copy of the GNU General Public License along
15 // with this library; see the file COPYING3.  If not see
16 // <http://www.gnu.org/licenses/>.
17
18 // { dg-require-effective-target dfp }
19
20 // ISO/IEC TR 24733  3.2.2.4  Conversion to integral type (decimal32).
21 // ISO/IEC TR 24733  3.2.3.4  Conversion to integral type (decimal64).
22 // ISO/IEC TR 24733  3.2.4.4  Conversion to integral type (decimal128).
23
24 #include <decimal/decimal>
25 #include <climits>
26 #include <cstdio>
27 #include <testsuite_hooks.h>
28
29 // Use extension to replace implicit long long conversion with function call.
30 #define LONGLONG(X) decimal_to_long_long(X)
31
32 using namespace std::decimal;
33
34 void
35 conversion_to_integral_32 (void)
36 {
37   #undef MAXVAL
38   #define MAXVAL 999999LL
39   decimal32 a, b (1), c (-1), d (MAXVAL), e (-MAXVAL);
40   long long ll;
41
42   ll = LONGLONG (a); VERIFY (ll == 0LL);
43   ll = LONGLONG (b); VERIFY (ll == 1LL);
44   ll = LONGLONG (c); VERIFY (ll == -1LL);
45   ll = LONGLONG (d); VERIFY (ll == MAXVAL);
46   ll = LONGLONG (e); VERIFY (ll == -MAXVAL);
47 }
48
49 void
50 conversion_to_integral_64 (void)
51 {
52   #undef MAXVAL
53   #define MAXVAL 999999999999999LL
54   decimal64 a, b (1), c (-1), d (MAXVAL), e (-MAXVAL);
55   long long ll;
56
57   ll = LONGLONG (a); VERIFY (ll == 0LL);
58   ll = LONGLONG (b); VERIFY (ll == 1LL);
59   ll = LONGLONG (c); VERIFY (ll == -1LL);
60   ll = LONGLONG (d); VERIFY (ll == MAXVAL);
61   ll = LONGLONG (e); VERIFY (ll == -MAXVAL);
62 }
63
64 void
65 conversion_to_integral_128 (void)
66 {
67   #undef MAXVAL
68   #define MAXVAL LONG_LONG_MAX
69   decimal128 a, b (1), c (-1), d (MAXVAL), e (-MAXVAL);
70   long long ll;
71
72   ll = LONGLONG (a); VERIFY (ll == 0LL);
73   ll = LONGLONG (b); VERIFY (ll == 1LL);
74   ll = LONGLONG (c); VERIFY (ll == -1LL);
75   ll = LONGLONG (d); VERIFY (ll == MAXVAL);
76   ll = LONGLONG (e); VERIFY (ll == -MAXVAL);
77 }
78
79 int
80 main ()
81 {
82   conversion_to_integral_32 ();
83   conversion_to_integral_64 ();
84   conversion_to_integral_128 ();
85 }