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