[thirdparty/gcc.git] / libdecnumber / decNumber.h

/* Decimal Number module header for the decNumber C Library
   Copyright (C) 2005 Free Software Foundation, Inc.
   Contributed by IBM Corporation.  Author Mike Cowlishaw.

   This file is part of GCC.

   GCC is free software; you can redistribute it and/or modify it under
   the terms of the GNU General Public License as published by the Free
   Software Foundation; either version 2, or (at your option) any later
   version.

   GCC is distributed in the hope that it will be useful, but WITHOUT ANY
   WARRANTY; without even the implied warranty of MERCHANTABILITY or
   FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
   for more details.

   You should have received a copy of the GNU General Public License
   along with GCC; see the file COPYING.  If not, write to the Free
   Software Foundation, 59 Temple Place - Suite 330, Boston, MA
   02111-1307, USA.  */

#if !defined(DECNUMBER)
#define DECNUMBER
#define DECNAME     "decNumber"	/* Short name */
#define DECVERSION  "decNumber 3.24"	/* Version [16 max.] */
#define DECFULLNAME "Decimal Number Module"	/* Verbose name */
#define DECAUTHOR   "Mike Cowlishaw"	/* Who to blame */

#if !defined(DECCONTEXT)
#include "decContext.h"
#endif


  /* Bit settings for decNumber.bits */
#define DECNEG    0x80		/* Sign; 1=negative, 0=positive or zero */
#define DECINF    0x40		/* 1=Infinity */
#define DECNAN    0x20		/* 1=NaN */
#define DECSNAN   0x10		/* 1=sNaN */
  /* The remaining bits are reserved; they must be 0 */
#define DECSPECIAL (DECINF|DECNAN|DECSNAN)	/* any special value */

  /* DECNUMDIGITS is the default number of digits we can hold in the */
  /* structure.  If undefined, 1 is assumed and it is assumed that the */
  /* structure will be immediately followed by extra space (if */
  /* required).  DECNUMDIGITS is always >0. */
#if !defined(DECNUMDIGITS)
#define DECNUMDIGITS 1
#endif


  /* Define the decNumber data structure.  The size and shape of the */
  /* units array in the structure is determined by the following */
  /* constant.  This must not be changed without recompiling the */
  /* decNumber library modules. */
#define DECDPUN 4		/* Decimal Digits Per UNit [must be in */
				   /* range 1-9; power of 2 recommended]. */
  /* The size (integer data type) of each unit is determined by the */
  /* number of digits it will hold. */
#if   DECDPUN<=2
#define decNumberUnit uint8_t
#elif DECDPUN<=4
#define decNumberUnit uint16_t
#else
#define decNumberUnit uint32_t
#endif
  /* The number of decNumberUnits we need is ceiling of DECNUMDIGITS/DECDPUN */
#define DECNUMUNITS ((DECNUMDIGITS+DECDPUN-1)/DECDPUN)

  /* The data structure... */
typedef struct
{
  int32_t digits;		/* Count of digits in the coefficient; >0 */
  int32_t exponent;		/* Unadjusted exponent, unbiased, in */
  /* range: -1999999997 through 999999999 */
  uint8_t bits;			/* Indicator bits (see above) */
  decNumberUnit lsu[DECNUMUNITS];	/* Coefficient, from least significant unit */
} decNumber;

  /* Notes: */
  /* 1. If digits is > DECDPUN then there will be more than one */
  /*    decNumberUnits immediately following the first element of lsu. */
  /*    These contain the remaining (more significant) digits of the */
  /*    number, and may be in the lsu array, or may be guaranteed by */
  /*    some other mechanism (such as being contained in another */
  /*    structure, or being overlaid on dynamically allocated storage). */
  /* */
  /*    Each integer of the coefficient (except the possibly the last) */
  /*    contains DECDPUN digits (e.g., a value in the range 0 through */
  /*    99999999 if DECDPUN is 8, or 0 through 9999 if DECDPUN is 4). */
  /* */
  /* 2. A decNumber converted to a string may need up to digits+14 */
  /*    characters.  The worst cases (non-exponential and exponential */
  /*    formats) are: -0.00000{9...}# */
  /*             and: -9.{9...}E+999999999#   (where # is '\0') */


  /* ------------------------------------------------------------------ */
  /* decNumber public functions and macros                              */
  /* ------------------------------------------------------------------ */

#ifdef IN_LIBGCC2
#define decNumberFromString __decNumberFromString
#define decNumberToString __decNumberToString
#define decNumberToEngString __decNumberToEngString
#define decNumberAbs __decNumberAbs
#define decNumberAdd __decNumberAdd
#define decNumberCompare __decNumberCompare
#define decNumberDivide __decNumberDivide
#define decNumberDivideInteger __decNumberDivideInteger
#define decNumberMax __decNumberMax
#define decNumberMin __decNumberMin
#define decNumberMinus __decNumberMinus
#define decNumberMultiply __decNumberMultiply
#define decNumberNormalize __decNumberNormalize
#define decNumberPlus __decNumberPlus
#define decNumberPower __decNumberPower
#define decNumberQuantize __decNumberQuantize
#define decNumberRemainder __decNumberRemainder
#define decNumberRemainderNear __decNumberRemainderNear
#define decNumberRescale __decNumberRescale
#define decNumberSameQuantum __decNumberSameQuantum
#define decNumberSquareRoot __decNumberSquareRoot
#define decNumberSubtract __decNumberSubtract
#define decNumberToIntegralValue __decNumberToIntegralValue
#define decNumberCopy __decNumberCopy
#define decNumberTrim __decNumberTrim
#define decNumberVersion __decNumberVersion
#define decNumberZero __decNumberZero
#endif

  /* Conversions */
decNumber *decNumberFromString (decNumber *, char *, decContext *);
char *decNumberToString (decNumber *, char *);
char *decNumberToEngString (decNumber *, char *);

  /* Operators */
decNumber *decNumberAbs (decNumber *, decNumber *, decContext *);
decNumber *decNumberAdd (decNumber *, decNumber *, decNumber *, decContext *);
decNumber *decNumberCompare (decNumber *, decNumber *, decNumber *,
			     decContext *);
decNumber *decNumberDivide (decNumber *, decNumber *, decNumber *,
			    decContext *);
decNumber *decNumberDivideInteger (decNumber *, decNumber *, decNumber *,
				   decContext *);
decNumber *decNumberMax (decNumber *, decNumber *, decNumber *, decContext *);
decNumber *decNumberMin (decNumber *, decNumber *, decNumber *, decContext *);
decNumber *decNumberMinus (decNumber *, decNumber *, decContext *);
decNumber *decNumberMultiply (decNumber *, decNumber *, decNumber *,
			      decContext *);
decNumber *decNumberNormalize (decNumber *, decNumber *, decContext *);
decNumber *decNumberPlus (decNumber *, decNumber *, decContext *);
decNumber *decNumberPower (decNumber *, decNumber *, decNumber *,
			   decContext *);
decNumber *decNumberQuantize (decNumber *, decNumber *, decNumber *,
			      decContext *);
decNumber *decNumberRemainder (decNumber *, decNumber *, decNumber *,
			       decContext *);
decNumber *decNumberRemainderNear (decNumber *, decNumber *, decNumber *,
				   decContext *);
decNumber *decNumberRescale (decNumber *, decNumber *, decNumber *,
			     decContext *);
decNumber *decNumberSameQuantum (decNumber *, decNumber *, decNumber *);
decNumber *decNumberSquareRoot (decNumber *, decNumber *, decContext *);
decNumber *decNumberSubtract (decNumber *, decNumber *, decNumber *,
			      decContext *);
decNumber *decNumberToIntegralValue (decNumber *, decNumber *, decContext *);

  /* Utilities */
decNumber *decNumberCopy (decNumber *, decNumber *);
decNumber *decNumberTrim (decNumber *);
const char *decNumberVersion (void);
decNumber *decNumberZero (decNumber *);

  /* Macros */
#define decNumberIsZero(dn)     (*(dn)->lsu==0 \
                                   && (dn)->digits==1 \
                                   && (((dn)->bits&DECSPECIAL)==0))
#define decNumberIsNegative(dn) (((dn)->bits&DECNEG)!=0)
#define decNumberIsNaN(dn)      (((dn)->bits&(DECNAN|DECSNAN))!=0)
#define decNumberIsInfinite(dn) (((dn)->bits&DECINF)!=0)
#define decNumberNegate(dn) (((dn)->bits)^=DECNEG)

#endif
Commit	Line	Data
473a74b9 BE	1	/* Decimal Number module header for the decNumber C Library
	2	Copyright (C) 2005 Free Software Foundation, Inc.
	3	Contributed by IBM Corporation. Author Mike Cowlishaw.
	4
	5	This file is part of GCC.
	6
	7	GCC is free software; you can redistribute it and/or modify it under
	8	the terms of the GNU General Public License as published by the Free
	9	Software Foundation; either version 2, or (at your option) any later
	10	version.
	11
	12	GCC is distributed in the hope that it will be useful, but WITHOUT ANY
	13	WARRANTY; without even the implied warranty of MERCHANTABILITY or
	14	FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
	15	for more details.
	16
	17	You should have received a copy of the GNU General Public License
	18	along with GCC; see the file COPYING. If not, write to the Free
	19	Software Foundation, 59 Temple Place - Suite 330, Boston, MA
	20	02111-1307, USA. */
	21
	22	#if !defined(DECNUMBER)
	23	#define DECNUMBER
	24	#define DECNAME "decNumber" /* Short name */
	25	#define DECVERSION "decNumber 3.24" /* Version [16 max.] */
	26	#define DECFULLNAME "Decimal Number Module" /* Verbose name */
	27	#define DECAUTHOR "Mike Cowlishaw" /* Who to blame */
	28
	29	#if !defined(DECCONTEXT)
	30	#include "decContext.h"
	31	#endif
	32
	33
	34	/* Bit settings for decNumber.bits */
	35	#define DECNEG 0x80 /* Sign; 1=negative, 0=positive or zero */
	36	#define DECINF 0x40 /* 1=Infinity */
	37	#define DECNAN 0x20 /* 1=NaN */
	38	#define DECSNAN 0x10 /* 1=sNaN */
	39	/* The remaining bits are reserved; they must be 0 */
	40	#define DECSPECIAL (DECINF\|DECNAN\|DECSNAN) /* any special value */
	41
	42	/* DECNUMDIGITS is the default number of digits we can hold in the */
	43	/* structure. If undefined, 1 is assumed and it is assumed that the */
	44	/* structure will be immediately followed by extra space (if */
	45	/* required). DECNUMDIGITS is always >0. */
	46	#if !defined(DECNUMDIGITS)
	47	#define DECNUMDIGITS 1
	48	#endif
	49
	50
	51	/* Define the decNumber data structure. The size and shape of the */
	52	/* units array in the structure is determined by the following */
	53	/* constant. This must not be changed without recompiling the */
	54	/* decNumber library modules. */
	55	#define DECDPUN 4 /* Decimal Digits Per UNit [must be in */
	56	/* range 1-9; power of 2 recommended]. */
	57	/* The size (integer data type) of each unit is determined by the */
	58	/* number of digits it will hold. */
	59	#if DECDPUN<=2
	60	#define decNumberUnit uint8_t
	61	#elif DECDPUN<=4
	62	#define decNumberUnit uint16_t
	63	#else
	64	#define decNumberUnit uint32_t
65	#endif
66	/* The number of decNumberUnits we need is ceiling of DECNUMDIGITS/DECDPUN */
67	#define DECNUMUNITS ((DECNUMDIGITS+DECDPUN-1)/DECDPUN)
68
69	/* The data structure... */
70	typedef struct
71	{
72	int32_t digits; /* Count of digits in the coefficient; >0 */
73	int32_t exponent; /* Unadjusted exponent, unbiased, in */
74	/* range: -1999999997 through 999999999 */
75	uint8_t bits; /* Indicator bits (see above) */
76	decNumberUnit lsu[DECNUMUNITS]; /* Coefficient, from least significant unit */
77	} decNumber;
78
79	/* Notes: */
80	/* 1. If digits is > DECDPUN then there will be more than one */
81	/* decNumberUnits immediately following the first element of lsu. */
82	/* These contain the remaining (more significant) digits of the */
83	/* number, and may be in the lsu array, or may be guaranteed by */
84	/* some other mechanism (such as being contained in another */
85	/* structure, or being overlaid on dynamically allocated storage). */
86	/* */
87	/* Each integer of the coefficient (except the possibly the last) */
88	/* contains DECDPUN digits (e.g., a value in the range 0 through */
89	/* 99999999 if DECDPUN is 8, or 0 through 9999 if DECDPUN is 4). */
90	/* */
91	/* 2. A decNumber converted to a string may need up to digits+14 */
92	/* characters. The worst cases (non-exponential and exponential */
93	/* formats) are: -0.00000{9...}# */
94	/* and: -9.{9...}E+999999999# (where # is '\0') */
95
96
97	/* ------------------------------------------------------------------ */
98	/* decNumber public functions and macros */
99	/* ------------------------------------------------------------------ */
100
101	#ifdef IN_LIBGCC2
102	#define decNumberFromString __decNumberFromString
103	#define decNumberToString __decNumberToString
104	#define decNumberToEngString __decNumberToEngString
105	#define decNumberAbs __decNumberAbs
106	#define decNumberAdd __decNumberAdd
107	#define decNumberCompare __decNumberCompare
108	#define decNumberDivide __decNumberDivide
109	#define decNumberDivideInteger __decNumberDivideInteger
110	#define decNumberMax __decNumberMax
111	#define decNumberMin __decNumberMin
112	#define decNumberMinus __decNumberMinus
113	#define decNumberMultiply __decNumberMultiply
114	#define decNumberNormalize __decNumberNormalize
115	#define decNumberPlus __decNumberPlus
116	#define decNumberPower __decNumberPower
117	#define decNumberQuantize __decNumberQuantize
118	#define decNumberRemainder __decNumberRemainder
119	#define decNumberRemainderNear __decNumberRemainderNear
120	#define decNumberRescale __decNumberRescale
121	#define decNumberSameQuantum __decNumberSameQuantum
122	#define decNumberSquareRoot __decNumberSquareRoot
123	#define decNumberSubtract __decNumberSubtract
124	#define decNumberToIntegralValue __decNumberToIntegralValue
125	#define decNumberCopy __decNumberCopy
126	#define decNumberTrim __decNumberTrim
127	#define decNumberVersion __decNumberVersion
128	#define decNumberZero __decNumberZero
129	#endif
130
131	/* Conversions */
132	decNumber decNumberFromString (decNumber , char , decContext );
133	char decNumberToString (decNumber , char *);
134	char decNumberToEngString (decNumber , char *);
135
136	/* Operators */
137	decNumber decNumberAbs (decNumber , decNumber , decContext );
138	decNumber decNumberAdd (decNumber , decNumber , decNumber , decContext *);
139	decNumber decNumberCompare (decNumber , decNumber , decNumber ,
140	decContext *);
141	decNumber decNumberDivide (decNumber , decNumber , decNumber ,
142	decContext *);
143	decNumber decNumberDivideInteger (decNumber , decNumber , decNumber ,
144	decContext *);
145	decNumber decNumberMax (decNumber , decNumber , decNumber , decContext *);
146	decNumber decNumberMin (decNumber , decNumber , decNumber , decContext *);
147	decNumber decNumberMinus (decNumber , decNumber , decContext );
148	decNumber decNumberMultiply (decNumber , decNumber , decNumber ,
149	decContext *);
150	decNumber decNumberNormalize (decNumber , decNumber , decContext );
151	decNumber decNumberPlus (decNumber , decNumber , decContext );
152	decNumber decNumberPower (decNumber , decNumber , decNumber ,
153	decContext *);
154	decNumber decNumberQuantize (decNumber , decNumber , decNumber ,
155	decContext *);
156	decNumber decNumberRemainder (decNumber , decNumber , decNumber ,
157	decContext *);
158	decNumber decNumberRemainderNear (decNumber , decNumber , decNumber ,
159	decContext *);
160	decNumber decNumberRescale (decNumber , decNumber , decNumber ,
161	decContext *);
162	decNumber decNumberSameQuantum (decNumber , decNumber , decNumber );
163	decNumber decNumberSquareRoot (decNumber , decNumber , decContext );
164	decNumber decNumberSubtract (decNumber , decNumber , decNumber ,
165	decContext *);
166	decNumber decNumberToIntegralValue (decNumber , decNumber , decContext );
167
168	/* Utilities */
169	decNumber decNumberCopy (decNumber , decNumber *);
170	decNumber decNumberTrim (decNumber );
171	const char *decNumberVersion (void);
172	decNumber decNumberZero (decNumber );
173
174	/* Macros */
175	#define decNumberIsZero(dn) (*(dn)->lsu==0 \
176	&& (dn)->digits==1 \
177	&& (((dn)->bits&DECSPECIAL)==0))
178	#define decNumberIsNegative(dn) (((dn)->bits&DECNEG)!=0)
179	#define decNumberIsNaN(dn) (((dn)->bits&(DECNAN\|DECSNAN))!=0)
180	#define decNumberIsInfinite(dn) (((dn)->bits&DECINF)!=0)
181	#define decNumberNegate(dn) (((dn)->bits)^=DECNEG)
182
183	#endif