diff options
author | Per Bothner <per@bothner.com> | 1997-10-21 21:15:52 +0000 |
---|---|---|
committer | Per Bothner <per@bothner.com> | 1997-10-21 21:15:52 +0000 |
commit | fbb09651da44847f1275b74ac85920b40f6cbfc6 (patch) | |
tree | b655e352a68cacb03e6a94677882ffd83cbcdd93 /gdb/ch-exp.c | |
parent | 61a60a8a703159f1a1589b48a1a81bd299f0e981 (diff) | |
download | gdb-fbb09651da44847f1275b74ac85920b40f6cbfc6.zip gdb-fbb09651da44847f1275b74ac85920b40f6cbfc6.tar.gz gdb-fbb09651da44847f1275b74ac85920b40f6cbfc6.tar.bz2 |
* ch-exp.c: Rename FIELD_NAME to DOT_FIELD_NAME (to avoid conflict).
Diffstat (limited to 'gdb/ch-exp.c')
-rw-r--r-- | gdb/ch-exp.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gdb/ch-exp.c b/gdb/ch-exp.c index cc7d7f7..45436a3 100644 --- a/gdb/ch-exp.c +++ b/gdb/ch-exp.c @@ -91,7 +91,7 @@ enum ch_terminal { CHARACTER_STRING_LITERAL, BIT_STRING_LITERAL, TYPENAME, - FIELD_NAME, + DOT_FIELD_NAME, /* '.' followed by <field name> */ CASE, OF, ESAC, @@ -537,7 +537,7 @@ parse_named_record_element () 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 (':')) @@ -555,7 +555,7 @@ static void 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 (); @@ -845,7 +845,7 @@ parse_primval () { 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); @@ -2137,7 +2137,7 @@ ch_lex () inputname = match_simple_name_string (); if (!inputname) return '.'; - return FIELD_NAME; + return DOT_FIELD_NAME; } return (ILLEGAL_TOKEN); |