diff options
| author | Fred Fish <fnf@specifix.com> | 1993-01-21 18:13:55 +0000 |
|---|---|---|
| committer | Fred Fish <fnf@specifix.com> | 1993-01-21 18:13:55 +0000 |
| commit | fcbadaee94dcdcc47eb623ce1c41f2bf92719e42 (patch) | |
| tree | 724eb840af8417b004d4585538b81cd8d62c0a0f /gdb/ch-exp.y | |
| parent | 2c320e35984957fbca00f3bad8cea39bc75f4c49 (diff) | |
| download | gdb-fcbadaee94dcdcc47eb623ce1c41f2bf92719e42.zip gdb-fcbadaee94dcdcc47eb623ce1c41f2bf92719e42.tar.gz gdb-fcbadaee94dcdcc47eb623ce1c41f2bf92719e42.tar.bz2 | |
* eval.c (evaluate_subexp): Fix OP_ARRAY, remove code that
implied that "no side effects" was nonfunctional.
* eval.c (evaluate_subexp): Add BINOP_CONCAT case to deal with
character string and bitstring concatenation.
* expprint.c (dump_expression): Add case for BINOP_CONCAT.
* expression.h (exp_opcode): Add BINOP_CONCAT.
* gdbtypes.h (type_code): Add TYPE_CODE_BITSTRING.
* language.c (string_type): Add function to determine if a type
is a string type.
* language.c (binop_type_check): Add case for BINOP_CONCAT.
* valarith.c (value_concat): New function to concatenate two
values, such as character strings or bitstrings.
* valops.c (value_string): Remove error stub and implement
function body.
* value.h (value_concat): Add prototype.
**** start-sanitize-chill ****
* ch-exp.y (operand_3): Add actions for SLASH_SLASH (//).
* ch-exp.y (yylex): Recognize SLASH_SLASH.
* ch-lang.c (chill_op_print_tab): Add SLASH_SLASH (//) as
BINOP_CONCAT.
**** end-sanitize-chill ****
Diffstat (limited to 'gdb/ch-exp.y')
| -rw-r--r-- | gdb/ch-exp.y | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gdb/ch-exp.y b/gdb/ch-exp.y index 35fb2fe..cb17086 100644 --- a/gdb/ch-exp.y +++ b/gdb/ch-exp.y @@ -759,7 +759,7 @@ operand_3 : operand_4 } | operand_3 SLASH_SLASH operand_4 { - $$ = 0; /* FIXME */ + write_exp_elt_opcode (BINOP_CONCAT); } ; @@ -1778,7 +1778,6 @@ yylex () case '+': case '-': case '*': - case '/': case '(': case ')': case '[': |