home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / binutils-2.7-src.tgz / tar.out / fsf / binutils / gas / flonum.h < prev    next >
C/C++ Source or Header  |  1996-09-28  |  4KB  |  110 lines
  1. /* flonum.h - Floating point package
  2.  
  3.    Copyright (C) 1987, 90, 91, 92, 94, 95, 1996 Free Software Foundation, Inc.
  4.  
  5.    This file is part of GAS, the GNU Assembler.
  6.  
  7.    GAS is free software; you can redistribute it and/or modify
  8.    it under the terms of the GNU General Public License as published by
  9.    the Free Software Foundation; either version 2, or (at your option)
  10.    any later version.
  11.  
  12.    GAS is distributed in the hope that it will be useful,
  13.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15.    GNU General Public License for more details.
  16.  
  17.    You should have received a copy of the GNU General Public License
  18.    along with GAS; see the file COPYING.  If not, write to
  19.    the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  20.  
  21. /***********************************************************************\
  22.  *                                    *
  23.  *    Arbitrary-precision floating point arithmetic.            *
  24.  *                                    *
  25.  *                                    *
  26.  *    Notation: a floating point number is expressed as        *
  27.  *    MANTISSA * (2 ** EXPONENT).                    *
  28.  *                                    *
  29.  *    If this offends more traditional mathematicians, then        *
  30.  *    please tell me your nomenclature for flonums!            *
  31.  *                                    *
  32.  \***********************************************************************/
  33.  
  34. #include "bignum.h"
  35.  
  36. /***********************************************************************\
  37.  *                                    *
  38.  *    Variable precision floating point numbers.            *
  39.  *                                    *
  40.  *    Exponent is the place value of the low littlenum. E.g.:        *
  41.  *    If  0:  low points to the units             littlenum.        *
  42.  *    If  1:  low points to the LITTLENUM_RADIX   littlenum.        *
  43.  *    If -1:  low points to the 1/LITTLENUM_RADIX littlenum.        *
  44.  *                                    *
  45.  \***********************************************************************/
  46.  
  47. /* JF:  A sign value of 0 means we have been asked to assemble NaN
  48.    A sign value of 'P' means we've been asked to assemble +Inf
  49.    A sign value of 'N' means we've been asked to assemble -Inf
  50.    */
  51. struct FLONUM_STRUCT
  52. {
  53.   LITTLENUM_TYPE *low;        /* low order littlenum of a bignum */
  54.   LITTLENUM_TYPE *high;        /* high order littlenum of a bignum */
  55.   LITTLENUM_TYPE *leader;    /* -> 1st non-zero littlenum */
  56.   /* If flonum is 0.0, leader==low-1 */
  57.   long exponent;        /* base LITTLENUM_RADIX */
  58.   char sign;            /* '+' or '-' */
  59. };
  60.  
  61. typedef struct FLONUM_STRUCT FLONUM_TYPE;
  62.  
  63.  
  64. /***********************************************************************\
  65.  *                                    *
  66.  *    Since we can (& do) meet with exponents like 10^5000, it    *
  67.  *    is silly to make a table of ~ 10,000 entries, one for each    *
  68.  *    power of 10. We keep a table where item [n] is a struct        *
  69.  *    FLONUM_FLOATING_POINT representing 10^(2^n). We then        *
  70.  *    multiply appropriate entries from this table to get any        *
  71.  *    particular power of 10. For the example of 10^5000, a table    *
  72.  *    of just 25 entries suffices: 10^(2^-12)...10^(2^+12).        *
  73.  *                                    *
  74.  \***********************************************************************/
  75.  
  76.  
  77. extern const FLONUM_TYPE flonum_positive_powers_of_ten[];
  78. extern const FLONUM_TYPE flonum_negative_powers_of_ten[];
  79. extern const int table_size_of_flonum_powers_of_ten;
  80. /* Flonum_XXX_powers_of_ten[] table has */
  81. /* legal indices from 0 to */
  82. /* + this number inclusive. */
  83.  
  84.  
  85.  
  86. /***********************************************************************\
  87.  *                                    *
  88.  *    Declare worker functions.                    *
  89.  *                                    *
  90.  \***********************************************************************/
  91.  
  92. int atof_generic PARAMS ((char **address_of_string_pointer,
  93.               const char *string_of_decimal_marks,
  94.               const char *string_of_decimal_exponent_marks,
  95.               FLONUM_TYPE * address_of_generic_floating_point_number));
  96.  
  97. void flonum_copy PARAMS ((FLONUM_TYPE * in, FLONUM_TYPE * out));
  98. void flonum_multip PARAMS ((const FLONUM_TYPE * a, const FLONUM_TYPE * b,
  99.                 FLONUM_TYPE * product));
  100.  
  101. /***********************************************************************\
  102.  *                                    *
  103.  *    Declare error codes.                        *
  104.  *                                    *
  105.  \***********************************************************************/
  106.  
  107. #define ERROR_EXPONENT_OVERFLOW (2)
  108.  
  109. /* end of flonum.h */
  110.