diff options
author | wilson <wilson@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-09-11 05:08:22 +0000 |
---|---|---|
committer | wilson <wilson@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-09-11 05:08:22 +0000 |
commit | 9300b3b3105dd3571b065924aab607c34a8f7a3d (patch) | |
tree | 961170966b14151df4fa875915bddca5829ec66b /gcc/real.c | |
parent | 6dab3e14c27e94551f18b59b4fb59d8ca84b95de (diff) | |
download | ppe42-gcc-9300b3b3105dd3571b065924aab607c34a8f7a3d.tar.gz ppe42-gcc-9300b3b3105dd3571b065924aab607c34a8f7a3d.zip |
* real.c: Update URL to VAX floating point docs.
(decode_vax_d): Extract 8 exponent bits instead of 7.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@71294 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/real.c')
-rw-r--r-- | gcc/real.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/real.c b/gcc/real.c index d2e780c7843..08a2ab20310 100644 --- a/gcc/real.c +++ b/gcc/real.c @@ -3623,7 +3623,7 @@ const struct real_format mips_quad_format = /* Descriptions of VAX floating point formats can be found beginning at - http://www.openvms.compaq.com:8000/73final/4515/4515pro_013.html#f_floating_point_format + http://h71000.www7.hp.com/doc/73FINAL/4515/4515pro_013.html#f_floating_point_format The thing to remember is that they're almost IEEE, except for word order, exponent bias, and the lack of infinities, nans, and denormals. @@ -3768,7 +3768,7 @@ decode_vax_d (const struct real_format *fmt ATTRIBUTE_UNUSED, image0 &= 0xffffffff; image1 &= 0xffffffff; - exp = (image0 >> 7) & 0x7f; + exp = (image0 >> 7) & 0xff; memset (r, 0, sizeof (*r)); |