re PR c/14088 (Hexfloat constants with uppercase 0X prefix fail)

	PR c/14088
	real.c (real_from_string): Look for 'X' as well as 'x' in
	hexfloat strings.

From-SVN: r77619

gcc/ChangeLog

+2004-02-10  Danny Smith  <dannysmith@users.sourceforge.net>
+
+	PR c/14088
+	real.c (real_from_string): Look for 'X' as well as 'x' in
+	hexfloat strings.
+
 2004-02-10  Kazu Hirata  <kazu@cs.umass.edu>
 
 	* config/h8300/h8300.md: Remove an incorrect comment about

gcc/real.c

@@ -1769,7 +1769,7 @@ real_from_string (REAL_VALUE_TYPE *r, const char *str)
   else if (*str == '+')
     str++;
 
-  if (str[0] == '0' && str[1] == 'x')
+  if (str[0] == '0' && (str[1] == 'x' || str[1] == 'X'))
     {
       /* Hexadecimal floating point.  */
       int pos = SIGNIFICAND_BITS - 4, d;