From: Theodore A. Roth Date: Wed, 6 Nov 2002 22:48:25 +0000 (+0000) Subject: * c-exp.y: Add missing semi-colons. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=ef9441350c3b5a17b2791f701b73d15ebdc91b58;p=binutils-gdb.git * c-exp.y: Add missing semi-colons. * f-exp.y: Add missing semi-colons. * m2-exp.y: Add missing semi-colons. * p-exp.y: Add missing semi-colons. Add empty action to start rule to avoid a type clash error when building with bison >= 1.50. --- diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 707dadfb1bc..ff780bd960d 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,12 @@ +2002-11-06 Theodore A. Roth + + * c-exp.y: Add missing semi-colons. + * f-exp.y: Add missing semi-colons. + * m2-exp.y: Add missing semi-colons. + * p-exp.y: Add missing semi-colons. + Add empty action to start rule to avoid a type clash error when + building with bison >= 1.50. + 2002-11-06 Jim Blandy * macrotab.h (struct macro_source_file): Doc fix. diff --git a/gdb/c-exp.y b/gdb/c-exp.y index 1f344c47b7b..9df0aee428f 100644 --- a/gdb/c-exp.y +++ b/gdb/c-exp.y @@ -247,9 +247,11 @@ exp1 : exp /* Expressions, not including the comma operator. */ exp : '*' exp %prec UNARY { write_exp_elt_opcode (UNOP_IND); } + ; exp : '&' exp %prec UNARY { write_exp_elt_opcode (UNOP_ADDR); } + ; exp : '-' exp %prec UNARY { write_exp_elt_opcode (UNOP_NEG); } diff --git a/gdb/f-exp.y b/gdb/f-exp.y index b9004264eec..56fd70af954 100644 --- a/gdb/f-exp.y +++ b/gdb/f-exp.y @@ -241,9 +241,11 @@ exp : '(' exp ')' /* Expressions, not including the comma operator. */ exp : '*' exp %prec UNARY { write_exp_elt_opcode (UNOP_IND); } + ; exp : '&' exp %prec UNARY { write_exp_elt_opcode (UNOP_ADDR); } + ; exp : '-' exp %prec UNARY { write_exp_elt_opcode (UNOP_NEG); } @@ -283,6 +285,7 @@ arglist : exp arglist : substring { arglist_len = 2;} + ; arglist : arglist ',' exp %prec ABOVE_COMMA { arglist_len++; } diff --git a/gdb/m2-exp.y b/gdb/m2-exp.y index e291d62b1cb..3fb46851c84 100644 --- a/gdb/m2-exp.y +++ b/gdb/m2-exp.y @@ -216,6 +216,7 @@ type_exp: type exp : exp '^' %prec UNARY { write_exp_elt_opcode (UNOP_IND); } + ; exp : '-' { number_sign = -1; } @@ -330,6 +331,7 @@ exp : INCL '(' exp ',' exp ')' exp : EXCL '(' exp ',' exp ')' { error("Sets are not implemented.");} + ; set : '{' arglist '}' { error("Sets are not implemented.");} diff --git a/gdb/p-exp.y b/gdb/p-exp.y index 4dc99be8ce4..d52747b072e 100644 --- a/gdb/p-exp.y +++ b/gdb/p-exp.y @@ -233,7 +233,8 @@ static int search_field; start : { current_type = NULL; search_field = 0; } - normal_start; + normal_start {} + ; normal_start : exp1 @@ -257,11 +258,13 @@ exp : exp '^' %prec UNARY { write_exp_elt_opcode (UNOP_IND); if (current_type) current_type = TYPE_TARGET_TYPE (current_type); } + ; exp : '@' exp %prec UNARY { write_exp_elt_opcode (UNOP_ADDR); if (current_type) current_type = TYPE_POINTER_TYPE (current_type); } + ; exp : '-' exp %prec UNARY { write_exp_elt_opcode (UNOP_NEG); } @@ -317,6 +320,7 @@ exp : exp '[' write_exp_elt_opcode (BINOP_SUBSCRIPT); if (current_type) current_type = TYPE_TARGET_TYPE (current_type); } + ; exp : exp '(' /* This is to save the value of arglist_len