yggdrasil/binutils-gdb
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

2002-12-09 David Carlton <carlton@math.stanford.edu>

Browse Source 
* p-exp.y: Rename TRUE and FALSE to TRUEKEYWORD and FALSEKEYWORD.
This commit is contained in:
David Carlton 2002-12-09 20:48:07 +00:00
parent f3c39e76bb
commit 2692ddb358
2 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gdb/ChangeLog
View File

@ -1,3 +1,7 @@
2002-12-09 David Carlton <carlton@math.stanford.edu>
* p-exp.y: Rename TRUE and FALSE to TRUEKEYWORD and FALSEKEYWORD.
2002-12-09 David Carlton <carlton@math.stanford.edu>
* linespec.c (symtab_from_filename): New function.

10
gdb/p-exp.y
View File

@ -205,7 +205,7 @@ static int search_field;
/* Object pascal */
%token THIS
%token <lval> TRUE FALSE
%token <lval> TRUEKEYWORD FALSEKEYWORD
%left ','
%left ABOVE_COMMA
@ -434,13 +434,13 @@ exp : exp ASSIGN exp
{ write_exp_elt_opcode (BINOP_ASSIGN); }
;
exp : TRUE
exp : TRUEKEYWORD
{ write_exp_elt_opcode (OP_BOOL);
write_exp_elt_longcst ((LONGEST) $1);
write_exp_elt_opcode (OP_BOOL); }
;
exp : FALSE
exp : FALSEKEYWORD
{ write_exp_elt_opcode (OP_BOOL);
write_exp_elt_longcst ((LONGEST) $1);
write_exp_elt_opcode (OP_BOOL); }
@ -1379,14 +1379,14 @@ yylex ()
if (STREQ (uptokstart, "FALSE"))
{
yylval.lval = 0;
return FALSE;
return FALSEKEYWORD;
}
break;
case 4:
if (STREQ (uptokstart, "TRUE"))
{
yylval.lval = 1;
return TRUE;
return TRUEKEYWORD;
}
if (STREQ (uptokstart, "SELF"))
{