Home | History | Annotate | Download | only in decimal
      1 // decimal classes -*- C++ -*-
      2 
      3 // Copyright (C) 2009-2013 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 (at) 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 namespace decimal
     41 {
     42   _GLIBCXX_BEGIN_NAMESPACE_VERSION
     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   _GLIBCXX_END_NAMESPACE_VERSION
    465 } // namespace decimal
    466 } // namespace std
    467 
    468 #endif /* _GLIBCXX_DECIMAL_IMPL */
    469