Lines Matching refs:atom_name
1174 ATOM_NAME, ATOM_LPAREN, ATOM_RPAREN, ATOM_INTEGER, ATOM_STRING
1189 static char *atom_string, atom_name[MAX_ATOM_SIZE];
1368 p = atom_name;
1493 return ATOM_NAME;
1606 return ATOM_NAME;
1632 case ATOM_NAME:
1666 i = gfc_string2code (m, atom_name);
1727 case ATOM_NAME:
1806 write_atom (ATOM_NAME, gfc_code2string (m, t));
1809 require_atom (ATOM_NAME);
2479 if (t != ATOM_NAME)
2840 /* So as not to disturb the existing API, use an ATOM_NAME to
2845 write_atom (ATOM_NAME, "DEFERRED_CL");
2849 if (parse_atom () != ATOM_NAME)
3729 if (t != ATOM_NAME)
4370 write_atom (ATOM_NAME, "OMP_DECLARE_SIMD");
4410 require_atom (ATOM_NAME);
4414 if (peek_atom () == ATOM_NAME)
4421 while (peek_atom () == ATOM_NAME)
4711 case ATOM_NAME:
7388 if ((start == 1 && strcmp (atom_name, "GFORTRAN") != 0)
7389 || (start == 2 && strcmp (atom_name, " module") != 0))
7394 if (strcmp (atom_name, " version") != 0