* breakpoint.c (bpstat_do_actions): Use a cleanup to restore

executing_breakpoint_commands if we are interrupted by error.
* coffread.c (init_lineno):  Avoid problem with zero-sized linetab
versus malloc/free.  From: john@labtam.labtam.oz.au (John Carey).
* core.c (solib_add_stub, core_open):  Call SOLIB_ADD inside a
catch_errors() so we can setup the frame regardless of whether
the shared libs work.
* ieee-float.c (double_to_ieee_extended):  Get exponent from
right place in little-endian systems.  From John Carey.
This commit is contained in:
John Gilmore
1991-08-19 20:55:06 +00:00
parent 361bf6eee5
commit 5c9878f19c
2 changed files with 18 additions and 5 deletions

View File

@@ -76,7 +76,7 @@ double_to_ieee_extended (ext_format, from, to)
double dfrom = *from;
unsigned long twolongs[2];
unsigned long mant0, mant1, exponent;
unsigned char twobytes[2];
unsigned char tobytes[8];
bzero (to, TOTALSIZE);
if (dfrom == 0)
@@ -95,13 +95,13 @@ double_to_ieee_extended (ext_format, from, to)
/* The following code assumes that the host has IEEE doubles. FIXME-someday.
It also assumes longs are 32 bits! FIXME-someday. */
bcopy (from, twolongs, 8);
bcopy (from, twobytes, 2);
bcopy (from, tobytes, 8);
#if HOST_BYTE_ORDER == BIG_ENDIAN
exponent = ((twobytes[1] & 0xF0) >> 4) | (twobytes[0] & 0x7F) << 4;
exponent = ((tobytes[1] & 0xF0) >> 4) | (tobytes[0] & 0x7F) << 4;
mant0 = (twolongs[0] << 11) | twolongs[1] >> 21;
mant1 = (twolongs[1] << 11);
#else
exponent = ((twobytes[0] & 0xF0) >> 4) | (twobytes[1] & 0x7F) << 4;
exponent = ((tobytes[6] & 0xF0) >> 4) | (tobytes[7] & 0x7F) << 4;
mant0 = (twolongs[1] << 11) | twolongs[0] >> 21;
mant1 = (twolongs[0] << 11);
#endif