1 // decimal classes -*- C++ -*-
2 
3 // Copyright (C) 2009-2018 Free Software Foundation, Inc.
4 
5 // This file is part of the GNU ISO C++ Library.  This library is free
6 // software; you can redistribute it and/or modify it under the
7 // terms of the GNU General Public License as published by the
8 // Free Software Foundation; either version 3, or (at your option)
9 // any later version.
10 
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 // GNU General Public License for more details.
15 
16 // Under Section 7 of GPL version 3, you are granted additional
17 // permissions described in the GCC Runtime Library Exception, version
18 // 3.1, as published by the Free Software Foundation.
19 
20 // You should have received a copy of the GNU General Public License and
21 // a copy of the GCC Runtime Library Exception along with this program;
22 // see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
23 // <http://www.gnu.org/licenses/>.
24 
25 /** @file decimal/decimal.h
26  *  This is an internal header file, included by other library headers.
27  *  Do not attempt to use it directly. @headername{decimal}
28  */
29 
30 // ISO/IEC TR 24733
31 // Written by Janis Johnson <janis187@us.ibm.com>
32 
33 #ifndef _GLIBCXX_DECIMAL_IMPL
34 #define _GLIBCXX_DECIMAL_IMPL 1
35 
36 #pragma GCC system_header
37 
38 namespace std _GLIBCXX_VISIBILITY(default)
39 {
40 _GLIBCXX_BEGIN_NAMESPACE_VERSION
41 
42 namespace decimal
43 {
44   // ISO/IEC TR 24733  3.2.[234].1  Construct/copy/destroy.
45 
46   inline decimal32::decimal32(decimal64 __r)	: __val(__r.__getval()) {}
47   inline decimal32::decimal32(decimal128 __r)	: __val(__r.__getval()) {}
48   inline decimal64::decimal64(decimal32 __r)	: __val(__r.__getval()) {}
49   inline decimal64::decimal64(decimal128 __r)	: __val(__r.__getval()) {}
50   inline decimal128::decimal128(decimal32 __r)	: __val(__r.__getval()) {}
51   inline decimal128::decimal128(decimal64 __r)	: __val(__r.__getval()) {}
52 
53   // ISO/IEC TR 24733  3.2.[234].6  Compound assignment.
54 
55 #define _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_DEC(_Op1, _Op2, _T1, _T2)	 \
56   inline _T1& _T1::operator _Op1(_T2 __rhs)				 \
57   {									 \
58     __setval(__getval() _Op2 __rhs.__getval());				 \
59     return *this;							 \
60   }
61 
62 #define _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_INT(_Op1, _Op2, _T1, _T2)	 \
63   inline _T1& _T1::operator _Op1(_T2 __rhs)				 \
64   {									 \
65     __setval(__getval() _Op2 __rhs);					 \
66     return *this;							 \
67   }
68 
69 #define _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(_Op1, _Op2, _T1)		 \
70   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_DEC(_Op1, _Op2, _T1, decimal32)	 \
71   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_DEC(_Op1, _Op2, _T1, decimal64)	 \
72   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_DEC(_Op1, _Op2, _T1, decimal128)	 \
73   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_INT(_Op1, _Op2, _T1, int)		 \
74   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_INT(_Op1, _Op2, _T1, unsigned int) \
75   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_INT(_Op1, _Op2, _T1, long)	 \
76   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_INT(_Op1, _Op2, _T1, unsigned long)\
77   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_INT(_Op1, _Op2, _T1, long long)	 \
78   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_INT(_Op1, _Op2, _T1, unsigned long long)
79 
80   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(+=, +, decimal32)
81   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(-=, -, decimal32)
82   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(*=, *, decimal32)
83   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(/=, /, decimal32)
84 
85   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(+=, +, decimal64)
86   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(-=, -, decimal64)
87   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(*=, *, decimal64)
88   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(/=, /, decimal64)
89 
90   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(+=, +, decimal128)
91   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(-=, -, decimal128)
92   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(*=, *, decimal128)
93   _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS(/=, /, decimal128)
94 
95 #undef _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_DEC
96 #undef _DEFINE_DECIMAL_COMPOUND_ASSIGNMENT_INT
97 #undef _DEFINE_DECIMAL_COMPOUND_ASSIGNMENTS
98 
99   // Extension: Conversion to integral type.
100 
101   inline long long decimal32_to_long_long(decimal32 __d)
102   { return (long long)__d.__getval(); }
103 
104   inline long long decimal64_to_long_long(decimal64 __d)
105   { return (long long)__d.__getval(); }
106 
107   inline long long decimal128_to_long_long(decimal128 __d)
108   { return (long long)__d.__getval(); }
109 
110   inline long long decimal_to_long_long(decimal32 __d)
111   { return (long long)__d.__getval(); }
112 
113   inline long long decimal_to_long_long(decimal64 __d)
114   { return (long long)__d.__getval(); }
115 
116   inline long long decimal_to_long_long(decimal128 __d)
117   { return (long long)__d.__getval(); }
118 
119   // ISO/IEC TR 24733  3.2.5  Initialization from coefficient and exponent.
120 
121   static decimal32 make_decimal32(long long __coeff, int __exponent)
122   {
123     decimal32 __decexp = 1, __multiplier;
124 
125     if (__exponent < 0)
126       {
127 	__multiplier = 1.E-1DF;
128 	__exponent = -__exponent;
129       }
130     else
131       __multiplier = 1.E1DF;
132 
133     for (int __i = 0; __i < __exponent; ++__i)
134       __decexp *= __multiplier;
135 
136     return __coeff * __decexp;
137   }
138 
139   static decimal32 make_decimal32(unsigned long long __coeff, int __exponent)
140   {
141     decimal32 __decexp = 1, __multiplier;
142 
143     if (__exponent < 0)
144       {
145 	__multiplier = 1.E-1DF;
146 	__exponent = -__exponent;
147       }
148     else
149       __multiplier = 1.E1DF;
150 
151     for (int __i = 0; __i < __exponent; ++__i)
152       __decexp *= __multiplier;
153 
154     return __coeff * __decexp;
155   }
156 
157   static decimal64 make_decimal64(long long __coeff, int __exponent)
158   {
159     decimal64 __decexp = 1, __multiplier;
160 
161     if (__exponent < 0)
162       {
163 	__multiplier = 1.E-1DD;
164 	__exponent = -__exponent;
165       }
166     else
167       __multiplier = 1.E1DD;
168 
169     for (int __i = 0; __i < __exponent; ++__i)
170       __decexp *= __multiplier;
171 
172     return __coeff * __decexp;
173   }
174 
175   static decimal64 make_decimal64(unsigned long long __coeff, int __exponent)
176   {
177     decimal64 __decexp = 1, __multiplier;
178 
179     if (__exponent < 0)
180       {
181 	__multiplier = 1.E-1DD;
182 	__exponent = -__exponent;
183       }
184     else
185       __multiplier = 1.E1DD;
186 
187     for (int __i = 0; __i < __exponent; ++__i)
188       __decexp *= __multiplier;
189 
190     return __coeff * __decexp;
191   }
192 
193   static decimal128 make_decimal128(long long __coeff, int __exponent)
194   {
195     decimal128 __decexp = 1, __multiplier;
196 
197     if (__exponent < 0)
198       {
199 	__multiplier = 1.E-1DL;
200 	__exponent = -__exponent;
201       }
202     else
203       __multiplier = 1.E1DL;
204 
205     for (int __i = 0; __i < __exponent; ++__i)
206       __decexp *= __multiplier;
207 
208     return __coeff * __decexp;
209   }
210 
211   static decimal128 make_decimal128(unsigned long long __coeff, int __exponent)
212   {
213     decimal128 __decexp = 1, __multiplier;
214 
215     if (__exponent < 0)
216       {
217 	__multiplier = 1.E-1DL;
218 	__exponent = -__exponent;
219       }
220     else
221       __multiplier = 1.E1DL;
222 
223     for (int __i = 0; __i < __exponent; ++__i)
224       __decexp *= __multiplier;
225 
226     return __coeff * __decexp;
227   }
228 
229   // ISO/IEC TR 24733  3.2.6  Conversion to generic floating-point type.
230 
231   inline float decimal32_to_float(decimal32 __d)
232   { return (float)__d.__getval(); }
233 
234   inline float decimal64_to_float(decimal64 __d)
235   { return (float)__d.__getval(); }
236 
237   inline float decimal128_to_float(decimal128 __d)
238   { return (float)__d.__getval(); }
239 
240   inline float decimal_to_float(decimal32 __d)
241   { return (float)__d.__getval(); }
242 
243   inline float decimal_to_float(decimal64 __d)
244   { return (float)__d.__getval(); }
245 
246   inline float decimal_to_float(decimal128 __d)
247   { return (float)__d.__getval(); }
248 
249   inline double decimal32_to_double(decimal32 __d)
250   { return (double)__d.__getval(); }
251 
252   inline double decimal64_to_double(decimal64 __d)
253   { return (double)__d.__getval(); }
254 
255   inline double decimal128_to_double(decimal128 __d)
256   { return (double)__d.__getval(); }
257 
258   inline double decimal_to_double(decimal32 __d)
259   { return (double)__d.__getval(); }
260 
261   inline double decimal_to_double(decimal64 __d)
262   { return (double)__d.__getval(); }
263 
264   inline double decimal_to_double(decimal128 __d)
265   { return (double)__d.__getval(); }
266 
267   inline long double decimal32_to_long_double(decimal32 __d)
268   { return (long double)__d.__getval(); }
269 
270   inline long double decimal64_to_long_double(decimal64 __d)
271   { return (long double)__d.__getval(); }
272 
273   inline long double decimal128_to_long_double(decimal128 __d)
274   { return (long double)__d.__getval(); }
275 
276   inline long double decimal_to_long_double(decimal32 __d)
277   { return (long double)__d.__getval(); }
278 
279   inline long double decimal_to_long_double(decimal64 __d)
280   { return (long double)__d.__getval(); }
281 
282   inline long double decimal_to_long_double(decimal128 __d)
283   { return (long double)__d.__getval(); }
284 
285   // ISO/IEC TR 24733  3.2.7  Unary arithmetic operators.
286 
287 #define _DEFINE_DECIMAL_UNARY_OP(_Op, _Tp)	\
288   inline _Tp operator _Op(_Tp __rhs)		\
289   {						\
290     _Tp __tmp;					\
291     __tmp.__setval(_Op __rhs.__getval());	\
292     return __tmp;				\
293   }
294 
295   _DEFINE_DECIMAL_UNARY_OP(+, decimal32)
296   _DEFINE_DECIMAL_UNARY_OP(+, decimal64)
297   _DEFINE_DECIMAL_UNARY_OP(+, decimal128)
298   _DEFINE_DECIMAL_UNARY_OP(-, decimal32)
299   _DEFINE_DECIMAL_UNARY_OP(-, decimal64)
300   _DEFINE_DECIMAL_UNARY_OP(-, decimal128)
301 
302 #undef _DEFINE_DECIMAL_UNARY_OP
303 
304   // ISO/IEC TR 24733  3.2.8  Binary arithmetic operators.
305 
306 #define _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(_Op, _T1, _T2, _T3)	\
307   inline _T1 operator _Op(_T2 __lhs, _T3 __rhs)			\
308   {								\
309     _T1 __retval;						\
310     __retval.__setval(__lhs.__getval() _Op __rhs.__getval());	\
311     return __retval;						\
312   }
313 
314 #define _DEFINE_DECIMAL_BINARY_OP_BOTH(_Op, _T1, _T2, _T3)	\
315   inline _T1 operator _Op(_T2 __lhs, _T3 __rhs)			\
316   {								\
317     _T1 __retval;						\
318     __retval.__setval(__lhs.__getval() _Op __rhs.__getval());	\
319     return __retval;						\
320   }
321 
322 #define _DEFINE_DECIMAL_BINARY_OP_LHS(_Op, _T1, _T2)		\
323   inline _T1 operator _Op(_T1 __lhs, _T2 __rhs)			\
324   {								\
325     _T1 __retval;						\
326     __retval.__setval(__lhs.__getval() _Op __rhs);		\
327     return __retval;						\
328   }
329 
330 #define _DEFINE_DECIMAL_BINARY_OP_RHS(_Op, _T1, _T2)		\
331   inline _T1 operator _Op(_T2 __lhs, _T1 __rhs)			\
332   {								\
333     _T1 __retval;						\
334     __retval.__setval(__lhs _Op __rhs.__getval());		\
335     return __retval;						\
336   }
337 
338 #define _DEFINE_DECIMAL_BINARY_OP_WITH_INT(_Op, _T1)		\
339   _DEFINE_DECIMAL_BINARY_OP_LHS(_Op, _T1, int);			\
340   _DEFINE_DECIMAL_BINARY_OP_LHS(_Op, _T1, unsigned int);	\
341   _DEFINE_DECIMAL_BINARY_OP_LHS(_Op, _T1, long);		\
342   _DEFINE_DECIMAL_BINARY_OP_LHS(_Op, _T1, unsigned long);	\
343   _DEFINE_DECIMAL_BINARY_OP_LHS(_Op, _T1, long long);		\
344   _DEFINE_DECIMAL_BINARY_OP_LHS(_Op, _T1, unsigned long long);	\
345   _DEFINE_DECIMAL_BINARY_OP_RHS(_Op, _T1, int);			\
346   _DEFINE_DECIMAL_BINARY_OP_RHS(_Op, _T1, unsigned int);	\
347   _DEFINE_DECIMAL_BINARY_OP_RHS(_Op, _T1, long);		\
348   _DEFINE_DECIMAL_BINARY_OP_RHS(_Op, _T1, unsigned long);	\
349   _DEFINE_DECIMAL_BINARY_OP_RHS(_Op, _T1, long long);		\
350   _DEFINE_DECIMAL_BINARY_OP_RHS(_Op, _T1, unsigned long long);	\
351 
352   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal32, decimal32, decimal32)
353   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(+, decimal32)
354   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal64, decimal32, decimal64)
355   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal64, decimal64, decimal32)
356   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal64, decimal64, decimal64)
357   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(+, decimal64)
358   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal128, decimal32, decimal128)
359   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal128, decimal64, decimal128)
360   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal128, decimal128, decimal32)
361   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal128, decimal128, decimal64)
362   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(+, decimal128, decimal128, decimal128)
363   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(+, decimal128)
364 
365   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal32, decimal32, decimal32)
366   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(-, decimal32)
367   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal64, decimal32, decimal64)
368   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal64, decimal64, decimal32)
369   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal64, decimal64, decimal64)
370   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(-, decimal64)
371   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal128, decimal32, decimal128)
372   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal128, decimal64, decimal128)
373   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal128, decimal128, decimal32)
374   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal128, decimal128, decimal64)
375   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(-, decimal128, decimal128, decimal128)
376   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(-, decimal128)
377 
378   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal32, decimal32, decimal32)
379   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(*, decimal32)
380   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal64, decimal32, decimal64)
381   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal64, decimal64, decimal32)
382   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal64, decimal64, decimal64)
383   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(*, decimal64)
384   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal128, decimal32, decimal128)
385   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal128, decimal64, decimal128)
386   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal128, decimal128, decimal32)
387   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal128, decimal128, decimal64)
388   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(*, decimal128, decimal128, decimal128)
389   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(*, decimal128)
390 
391   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal32, decimal32, decimal32)
392   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(/, decimal32)
393   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal64, decimal32, decimal64)
394   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal64, decimal64, decimal32)
395   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal64, decimal64, decimal64)
396   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(/, decimal64)
397   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal128, decimal32, decimal128)
398   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal128, decimal64, decimal128)
399   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal128, decimal128, decimal32)
400   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal128, decimal128, decimal64)
401   _DEFINE_DECIMAL_BINARY_OP_WITH_DEC(/, decimal128, decimal128, decimal128)
402   _DEFINE_DECIMAL_BINARY_OP_WITH_INT(/, decimal128)
403 
404 #undef _DEFINE_DECIMAL_BINARY_OP_WITH_DEC
405 #undef _DEFINE_DECIMAL_BINARY_OP_BOTH
406 #undef _DEFINE_DECIMAL_BINARY_OP_LHS
407 #undef _DEFINE_DECIMAL_BINARY_OP_RHS
408 #undef _DEFINE_DECIMAL_BINARY_OP_WITH_INT
409 
410   // ISO/IEC TR 24733  3.2.9  Comparison operators.
411 
412 #define _DEFINE_DECIMAL_COMPARISON_BOTH(_Op, _T1, _T2)	\
413   inline bool operator _Op(_T1 __lhs, _T2 __rhs)	\
414   { return __lhs.__getval() _Op __rhs.__getval(); }
415 
416 #define _DEFINE_DECIMAL_COMPARISON_LHS(_Op, _T1, _T2)	\
417   inline bool operator _Op(_T1 __lhs, _T2 __rhs)	\
418   { return __lhs.__getval() _Op __rhs; }
419 
420 #define _DEFINE_DECIMAL_COMPARISON_RHS(_Op, _T1, _T2)	\
421   inline bool operator _Op(_T1 __lhs, _T2 __rhs)	\
422   { return __lhs _Op __rhs.__getval(); }
423 
424 #define _DEFINE_DECIMAL_COMPARISONS(_Op, _Tp)			\
425   _DEFINE_DECIMAL_COMPARISON_BOTH(_Op, _Tp, decimal32)		\
426   _DEFINE_DECIMAL_COMPARISON_BOTH(_Op, _Tp, decimal64)		\
427   _DEFINE_DECIMAL_COMPARISON_BOTH(_Op, _Tp, decimal128)		\
428   _DEFINE_DECIMAL_COMPARISON_LHS(_Op, _Tp, int)			\
429   _DEFINE_DECIMAL_COMPARISON_LHS(_Op, _Tp, unsigned int)	\
430   _DEFINE_DECIMAL_COMPARISON_LHS(_Op, _Tp, long)		\
431   _DEFINE_DECIMAL_COMPARISON_LHS(_Op, _Tp, unsigned long)	\
432   _DEFINE_DECIMAL_COMPARISON_LHS(_Op, _Tp, long long)		\
433   _DEFINE_DECIMAL_COMPARISON_LHS(_Op, _Tp, unsigned long long)	\
434   _DEFINE_DECIMAL_COMPARISON_RHS(_Op, int, _Tp)			\
435   _DEFINE_DECIMAL_COMPARISON_RHS(_Op, unsigned int, _Tp)	\
436   _DEFINE_DECIMAL_COMPARISON_RHS(_Op, long, _Tp)		\
437   _DEFINE_DECIMAL_COMPARISON_RHS(_Op, unsigned long, _Tp)	\
438   _DEFINE_DECIMAL_COMPARISON_RHS(_Op, long long, _Tp)		\
439   _DEFINE_DECIMAL_COMPARISON_RHS(_Op, unsigned long long, _Tp)
440 
441   _DEFINE_DECIMAL_COMPARISONS(==, decimal32)
442   _DEFINE_DECIMAL_COMPARISONS(==, decimal64)
443   _DEFINE_DECIMAL_COMPARISONS(==, decimal128)
444   _DEFINE_DECIMAL_COMPARISONS(!=, decimal32)
445   _DEFINE_DECIMAL_COMPARISONS(!=, decimal64)
446   _DEFINE_DECIMAL_COMPARISONS(!=, decimal128)
447   _DEFINE_DECIMAL_COMPARISONS(<,  decimal32)
448   _DEFINE_DECIMAL_COMPARISONS(<,  decimal64)
449   _DEFINE_DECIMAL_COMPARISONS(<,  decimal128)
450   _DEFINE_DECIMAL_COMPARISONS(<=, decimal32)
451   _DEFINE_DECIMAL_COMPARISONS(<=, decimal64)
452   _DEFINE_DECIMAL_COMPARISONS(<=, decimal128)
453   _DEFINE_DECIMAL_COMPARISONS(>,  decimal32)
454   _DEFINE_DECIMAL_COMPARISONS(>,  decimal64)
455   _DEFINE_DECIMAL_COMPARISONS(>,  decimal128)
456   _DEFINE_DECIMAL_COMPARISONS(>=, decimal32)
457   _DEFINE_DECIMAL_COMPARISONS(>=, decimal64)
458   _DEFINE_DECIMAL_COMPARISONS(>=, decimal128)
459 
460 #undef _DEFINE_DECIMAL_COMPARISON_BOTH
461 #undef _DEFINE_DECIMAL_COMPARISON_LHS
462 #undef _DEFINE_DECIMAL_COMPARISON_RHS
463 #undef _DEFINE_DECIMAL_COMPARISONS
464 } // namespace decimal
465 
466 _GLIBCXX_END_NAMESPACE_VERSION
467 } // namespace std
468 
469 #endif /* _GLIBCXX_DECIMAL_IMPL */
470