+Tue Oct 21 14:15:26 1997 Per Bothner <bothner@cygnus.com>
+
+ * ch-exp.c: Rename FIELD_NAME to DOT_FIELD_NAME (to avoid conflict).
+
Fri Oct 17 13:22:02 1997 Stan Shebs <shebs@andros.cygnus.com>
* infcmd.c: Improve grammar of "set args" help.
CHARACTER_STRING_LITERAL,
BIT_STRING_LITERAL,
TYPENAME,
- FIELD_NAME,
+ DOT_FIELD_NAME, /* '.' followed by <field name> */
CASE,
OF,
ESAC,
label = PEEK_LVAL ().sval;
sprintf (buf, "expected a field name here `%s'", lexptr);
- expect (FIELD_NAME, buf);
+ expect (DOT_FIELD_NAME, buf);
if (check_token (','))
parse_named_record_element ();
else if (check_token (':'))
parse_tuple_element (type)
struct type *type;
{
- if (PEEK_TOKEN () == FIELD_NAME)
+ if (PEEK_TOKEN () == DOT_FIELD_NAME)
{
/* Parse a labelled structure tuple. */
parse_named_record_element ();
{
switch (PEEK_TOKEN ())
{
- case FIELD_NAME:
+ case DOT_FIELD_NAME:
write_exp_elt_opcode (STRUCTOP_STRUCT);
write_exp_string (PEEK_LVAL ().sval);
write_exp_elt_opcode (STRUCTOP_STRUCT);
inputname = match_simple_name_string ();
if (!inputname)
return '.';
- return FIELD_NAME;
+ return DOT_FIELD_NAME;
}
return (ILLEGAL_TOKEN);