1 /* This test used to ICE on the SPU target. */
2 extern const char *__ctype_ptr;
3 
parse_real(unsigned char c)4 parse_real (unsigned char c)
5 {
6   if ((__ctype_ptr[c]&04) && c != '.')
7    unget_char ( c);
8 }
9