OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fp-bit.h (LSHIFT): Take shift count parameter. 

* config/fp-bit.h (LSHIFT): Take shift count parameter.
	* config/fp-bit.c (_fpadd_parts): Shift in one go instead of one
	bit at a time.

From-SVN: r107602
This commit is contained in:
Joseph Myers 2005-11-28 13:41:38 +00:00 committed by Joseph Myers
parent e97f20583c
commit e13dd54f7a
3 changed files with 16 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ChangeLog
View File

@ -1,3 +1,9 @@
2005-11-28 Joseph S. Myers <joseph@codesourcery.com>
* config/fp-bit.h (LSHIFT): Take shift count parameter.
* config/fp-bit.c (_fpadd_parts): Shift in one go instead of one
bit at a time.
2005-11-28 Bernd Schmidt <bernd.schmidt@analog.com>
* config/bfin/bfin.c (bfin_secondary_reload): Renamed from

17
gcc/config/fp-bit.c
View File

@ -649,6 +649,7 @@ _fpadd_parts (fp_number_type * a,
they're the same */
{
int diff;
int sdiff;
a_normal_exp = a->normal_exp;
b_normal_exp = b->normal_exp;
@ -656,21 +657,21 @@ _fpadd_parts (fp_number_type * a,
b_fraction = b->fraction.ll;
diff = a_normal_exp - b_normal_exp;
sdiff = diff;
if (diff < 0)
diff = -diff;
if (diff < FRAC_NBITS)
{
/* ??? This does shifts one bit at a time. Optimize. */
while (a_normal_exp > b_normal_exp)
if (sdiff > 0)
{
b_normal_exp++;
LSHIFT (b_fraction);
b_normal_exp += diff;
LSHIFT (b_fraction, diff);
}
while (b_normal_exp > a_normal_exp)
else if (sdiff < 0)
{
a_normal_exp++;
LSHIFT (a_fraction);
a_normal_exp += diff;
LSHIFT (a_fraction, diff);
}
}
else
@ -731,7 +732,7 @@ _fpadd_parts (fp_number_type * a,
if (tmp->fraction.ll >= IMPLICIT_2)
{
LSHIFT (tmp->fraction.ll);
LSHIFT (tmp->fraction.ll, 1);
tmp->normal_exp++;
}
return tmp;

2
gcc/config/fp-bit.h
View File

@ -318,7 +318,7 @@ typedef unsigned int UTItype __attribute__ ((mode (TI)));
#endif
/* Preserve the sticky-bit when shifting fractions to the right. */
#define LSHIFT(a) { a = (a & 1) | (a >> 1); }
#define LSHIFT(a, s) { a = (a >> s) | !!(a & (((fractype) 1 << s) - 1)); }
/* numeric parameters */
/* F_D_BITOFF is the number of bits offset between the MSB of the mantissa