From fcbadaee94dcdcc47eb623ce1c41f2bf92719e42 Mon Sep 17 00:00:00 2001 From: Fred Fish Date: Thu, 21 Jan 1993 18:13:55 +0000 Subject: * 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 **** --- gdb/gdbtypes.h | 1 + 1 file changed, 1 insertion(+) (limited to 'gdb/gdbtypes.h') diff --git a/gdb/gdbtypes.h b/gdb/gdbtypes.h index 6da24ce..da4fdff 100644 --- a/gdb/gdbtypes.h +++ b/gdb/gdbtypes.h @@ -82,6 +82,7 @@ enum type_code TYPE_CODE_SET, /* Pascal sets */ TYPE_CODE_RANGE, /* Range (integers within spec'd bounds) */ TYPE_CODE_STRING, /* String types, distinct from array of char */ + TYPE_CODE_BITSTRING, /* String of bits, distinct from bool array */ TYPE_CODE_ERROR, /* Unknown type */ /* C++ */ -- cgit v1.1