From f77b29db52f6254670c9c31ed6a4c04ab94fcd0e Mon Sep 17 00:00:00 2001 From: Andrew Cagney Date: Thu, 2 Jan 2003 14:27:27 +0000 Subject: 2003-01-02 Andrew Cagney * valarith.c (value_binop): Delete obsolete code and comments. * configure.host: Ditto. * buildsym.h (make_blockvector): Ditto. * buildsym.c (make_blockvector): Ditto. * defs.h (enum language): Ditto. (chill_demangle): Ditto. * elfread.c (elf_symtab_read): Ditto. * dwarfread.c (CHILL_PRODUCER): Ditto. (set_cu_language): Ditto. (handle_producer): Ditto. * expprint.c (print_subexp): Ditto. * gdbtypes.c (chill_varying_type): Ditto. * gdbtypes.h (builtin_type_chill_bool): Ditto. (builtin_type_chill_char, builtin_type_chill_long): Ditto. (builtin_type_chill_ulong, builtin_type_chill_real): Ditto. (chill_varying_type): Ditto. * language.h (_LANG_chill): Ditto. * language.c (binop_result_type, integral_type): Ditto. (character_type, string_type, structured_type): Ditto. (lang_bool_type, binop_type_check): Ditto. * stabsread.h (os9k_stabs): Ditto. * stabsread.c (os9k_type_vector, dbx_lookup_type): Ditto. (define_symbol, read_type, read_struct_fields): Ditto. (read_array_type, read_enum_type, read_huge_number): Ditto. (read_range_type, start_stabs): Ditto. * symfile.c (init_filename_language_table): Ditto. (add_psymbol_with_dem_name_to_list): Ditto. * symtab.c (symbol_init_language_specific): Ditto. (symbol_init_demangled_name, symbol_demangled_name): Ditto. * symtab.h (struct general_symbol_info): Ditto. (SYMBOL_CHILL_DEMANGLED_NAME): Ditto. * typeprint.c (typedef_print): Ditto. * utils.c (fprintf_symbol_filtered): Ditto. * valops.c (value_cast, search_struct_field, value_slice): Delete obsolete code. (varying_to_slice): Delete function. * value.h (COERCE_VARYING_ARRAY): Delete obsolete macro contents. (varying_to_slice): Delete declaration. * MAINTAINERS: Update. --- gdb/eval.c | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'gdb/eval.c') diff --git a/gdb/eval.c b/gdb/eval.c index 65631752d67..18b29bdf60d 100644 --- a/gdb/eval.c +++ b/gdb/eval.c @@ -186,7 +186,7 @@ get_label (register struct expression *exp, int *pos) return NULL; } -/* This function evaluates tuples (in (OBSOLETE) Chill) or +/* This function evaluates tuples (in (the deleted) Chill) or brace-initializers (in C/C++) for structure types. */ static struct value * @@ -326,10 +326,11 @@ evaluate_struct_tuple (struct value *struct_val, } /* Recursive helper function for setting elements of array tuples for - (OBSOLETE) Chill. The target is ARRAY (which has bounds LOW_BOUND - to HIGH_BOUND); the element value is ELEMENT; EXP, POS and NOSIDE - are as usual. Evaluates index expresions and sets the specified - element(s) of ARRAY to ELEMENT. Returns last index value. */ + (the deleted) Chill. The target is ARRAY (which has bounds + LOW_BOUND to HIGH_BOUND); the element value is ELEMENT; EXP, POS + and NOSIDE are as usual. Evaluates index expresions and sets the + specified element(s) of ARRAY to ELEMENT. Returns last index + value. */ static LONGEST init_array_element (struct value *array, struct value *element, -- cgit v1.2.1