yggdrasil/binutils-gdb
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

2000-09-07 Kazu Hirata <kazu@hxi.com>

Browse Source 
* atof-generic.c: Fix formatting.
This commit is contained in:
Kazu Hirata 2000-09-07 21:04:26 +00:00
parent e13b337af5
commit e49bc11ea5
2 changed files with 27 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gas/ChangeLog
View File

@ -1,6 +1,7 @@
2000-09-07 Kazu Hirata <kazu@hxi.com>
* config/tc-mips.c: Fix formatting.
* atof-generic.c: Fix formatting.
* config/tc-mips.c: Likewise.
* config/tc-vax.c: Likewise.
* input-scrub.c: Likewise.

52
gas/atof-generic.c
View File

@ -1,5 +1,5 @@
/* atof_generic.c - turn a string of digits into a Flonum
Copyright (C) 1987, 90, 91, 92, 93, 94, 95, 96, 1998
Copyright (C) 1987, 90, 91, 92, 93, 94, 95, 96, 98, 2000
Free Software Foundation, Inc.
This file is part of GAS, the GNU Assembler.
@ -15,8 +15,9 @@
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GAS; see the file COPYING. If not, write to
the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
along with GAS; see the file COPYING. If not, write to the Free
Software Foundation, 59 Temple Place - Suite 330, Boston, MA
02111-1307, USA. */
#include <ctype.h>
#include <string.h>
@ -78,14 +79,14 @@ atof_generic (address_of_string_pointer,
string_of_decimal_marks,
string_of_decimal_exponent_marks,
address_of_generic_floating_point_number)
/* return pointer to just AFTER number we read. */
/* return pointer to just AFTER number we read. */
char **address_of_string_pointer;
/* At most one per number. */
/* At most one per number. */
const char *string_of_decimal_marks;
const char *string_of_decimal_exponent_marks;
FLONUM_TYPE *address_of_generic_floating_point_number;
{
int return_value; /* 0 means OK. */
int return_value; /* 0 means OK. */
char *first_digit;
unsigned int number_of_digits_before_decimal;
unsigned int number_of_digits_after_decimal;
@ -184,9 +185,9 @@ atof_generic (address_of_string_pointer,
}
else
{
break; /* p -> char after pre-decimal digits. */
break; /* p -> char after pre-decimal digits. */
}
} /* For each digit before decimal mark. */
} /* For each digit before decimal mark. */
#ifndef OLD_FLOAT_READS
/* Ignore trailing 0's after the decimal point. The original code here
@ -222,7 +223,7 @@ atof_generic (address_of_string_pointer,
{
if (isdigit ((unsigned char) c))
{
/* This may be retracted below. */
/* This may be retracted below. */
number_of_digits_after_decimal++;
if ( /* seen_significant_digit || */ c > '0')
@ -238,7 +239,7 @@ atof_generic (address_of_string_pointer,
}
break;
}
} /* For each digit after decimal mark. */
} /* For each digit after decimal mark. */
}
while (number_of_digits_after_decimal
@ -295,8 +296,6 @@ atof_generic (address_of_string_pointer,
*address_of_string_pointer = p;
number_of_digits_available =
number_of_digits_before_decimal + number_of_digits_after_decimal;
return_value = 0;
@ -311,7 +310,7 @@ atof_generic (address_of_string_pointer,
}
else
{
int count; /* Number of useful digits left to scan. */
int count; /* Number of useful digits left to scan. */
LITTLENUM_TYPE *digits_binary_low;
unsigned int precision;
@ -326,7 +325,7 @@ atof_generic (address_of_string_pointer,
precision = (address_of_generic_floating_point_number->high
- address_of_generic_floating_point_number->low
+ 1); /* Number of destination littlenums. */
+ 1); /* Number of destination littlenums. */
/* Includes guard bits (two littlenums worth) */
#if 0 /* The integer version below is very close, and it doesn't
@ -335,12 +334,12 @@ atof_generic (address_of_string_pointer,
maximum_useful_digits = (((double) (precision - 2))
* ((double) (LITTLENUM_NUMBER_OF_BITS))
/ (LOG_TO_BASE_2_OF_10))
+ 2; /* 2 :: guard digits. */
+ 2; /* 2 :: guard digits. */
#else
maximum_useful_digits = (((precision - 2))
* ( (LITTLENUM_NUMBER_OF_BITS))
* 1000000 / 3321928)
+ 2; /* 2 :: guard digits. */
+ 2; /* 2 :: guard digits. */
#endif
if (number_of_digits_available > maximum_useful_digits)
@ -388,7 +387,7 @@ atof_generic (address_of_string_pointer,
memset ((char *) digits_binary_low, '\0', size_of_digits_in_chars);
/* Digits_binary_low[] is allocated and zeroed. */
/* Digits_binary_low[] is allocated and zeroed. */
/*
* Parse the decimal digits as if * digits_low was in the units position.
@ -440,11 +439,10 @@ atof_generic (address_of_string_pointer,
}
else
{
++count; /* '.' doesn't alter digits used count. */
++count; /* '.' doesn't alter digits used count. */
}
}
/*
* Digits_binary_low[] properly encodes the value of the digits.
* Forget about any high-order littlenums that are 0.
@ -480,7 +478,7 @@ atof_generic (address_of_string_pointer,
LITTLENUM_TYPE *power_binary_low;
int decimal_exponent_is_negative;
/* This refers to the "-56" in "12.34E-56". */
/* This refers to the "-56" in "12.34E-56". */
/* FALSE: decimal_exponent is positive (or 0) */
/* TRUE: decimal_exponent is negative */
FLONUM_TYPE temporary_flonum;
@ -489,7 +487,7 @@ atof_generic (address_of_string_pointer,
unsigned int size_of_power_in_chars;
size_of_power_in_littlenums = precision;
/* Precision has a built-in fudge factor so we get a few guard bits. */
/* Precision has a built-in fudge factor so we get a few guard bits. */
decimal_exponent_is_negative = decimal_exponent < 0;
if (decimal_exponent_is_negative)
@ -497,7 +495,7 @@ atof_generic (address_of_string_pointer,
decimal_exponent = -decimal_exponent;
}
/* From now on: the decimal exponent is > 0. Its sign is separate. */
/* From now on: the decimal exponent is > 0. Its sign is separate. */
size_of_power_in_chars = size_of_power_in_littlenums
* sizeof (LITTLENUM_TYPE) + 2;
@ -530,7 +528,7 @@ atof_generic (address_of_string_pointer,
int place_number_limit;
/* Any 10^(2^n) whose "n" exceeds this */
/* value will fall off the end of */
/* flonum_XXXX_powers_of_ten[]. */
/* flonum_XXXX_powers_of_ten[]. */
int place_number;
const FLONUM_TYPE *multiplicand; /* -> 10^(2^n) */
@ -540,8 +538,8 @@ atof_generic (address_of_string_pointer,
? flonum_negative_powers_of_ten
: flonum_positive_powers_of_ten);
for (place_number = 1;/* Place value of this bit of exponent. */
decimal_exponent;/* Quit when no more 1 bits in exponent. */
for (place_number = 1;/* Place value of this bit of exponent. */
decimal_exponent;/* Quit when no more 1 bits in exponent. */
decimal_exponent >>= 1, place_number++)
{
if (decimal_exponent & 1)
@ -586,7 +584,7 @@ atof_generic (address_of_string_pointer,
(void) putchar ('\n');
#endif
} /* If this bit of decimal_exponent was computable.*/
} /* If this bit of decimal_exponent was set. */
} /* If this bit of decimal_exponent was set. */
} /* For each bit of binary representation of exponent */
#ifdef TRACE
printf ("after computing power_of_10_flonum:\n");
@ -605,7 +603,7 @@ atof_generic (address_of_string_pointer,
*/
flonum_multip (&power_of_10_flonum, &digits_flonum, address_of_generic_floating_point_number);
/* Assert sign of the number we made is '+'. */
/* Assert sign of the number we made is '+'. */
address_of_generic_floating_point_number->sign = digits_sign_char;
}