diff options
author | sayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-02-27 02:25:57 +0000 |
---|---|---|
committer | sayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-02-27 02:25:57 +0000 |
commit | 466fed6e96e98563cfc6e4237a6c9426ce7e83c5 (patch) | |
tree | 39a95215865328da09197e35b41bcda3f4b5ffae /gcc/real.c | |
parent | 4f87b914a9ddeb696b51496c53278ed86e4ac1dd (diff) | |
download | gcc-466fed6e96e98563cfc6e4237a6c9426ce7e83c5.tar.gz |
PR middle-end/19983
* real.c (real_nan): Allow both 0x and 0X as hexadecimal prefixes.
* gcc.c-torture/execute/ieee/builtin-nan-1.c: New test case.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@111470 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/real.c')
-rw-r--r-- | gcc/real.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/gcc/real.c b/gcc/real.c index 5d5b12ff7e8..c4b6479067f 100644 --- a/gcc/real.c +++ b/gcc/real.c @@ -2193,8 +2193,12 @@ real_nan (REAL_VALUE_TYPE *r, const char *str, int quiet, str++; if (*str == '0') { - if (*++str == 'x') - str++, base = 16; + str++; + if (*str == 'x' || *str == 'X') + { + base = 16; + str++; + } else base = 8; } |