diff options
| author | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-01-15 22:38:01 +0000 |
|---|---|---|
| committer | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-01-15 22:38:01 +0000 |
| commit | 0a37da8f90148050a105b3b3a44edda66a1f5d7a (patch) | |
| tree | 00642f152a422e8b458e01bdffb649b6068904e4 /gcc/fortran/primary.c | |
| parent | 95253e162ccc3d4b4325fd46de84665ffffee2c4 (diff) | |
| download | gcc-0a37da8f90148050a105b3b3a44edda66a1f5d7a.tar.gz | |
* primary.c (check_digit): Call 'ISXDIGIT' instead of assuming
ASCII-like character encoding.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@93713 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/primary.c')
| -rw-r--r-- | gcc/fortran/primary.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/fortran/primary.c b/gcc/fortran/primary.c index 32c6c36340c..da2b7c82b1a 100644 --- a/gcc/fortran/primary.c +++ b/gcc/fortran/primary.c @@ -1,5 +1,6 @@ /* Primary expression subroutines - Copyright (C) 2000, 2001, 2002, 2004 Free Software Foundation, Inc. + Copyright (C) 2000, 2001, 2002, 2004, 2005 Free Software Foundation, + Inc. Contributed by Andy Vaught This file is part of GCC. @@ -114,7 +115,7 @@ check_digit (int c, int radix) break; case 16: - r = ('0' <= c && c <= '9') || ('a' <= c && c <= 'f'); + r = ISXDIGIT (c); break; default: |