diff options
| author | Peter Schauer <Peter.Schauer@mytum.de> | 1995-07-20 05:52:42 +0000 |
|---|---|---|
| committer | Peter Schauer <Peter.Schauer@mytum.de> | 1995-07-20 05:52:42 +0000 |
| commit | bbcc95bdb1c2eb0c07778e1a1195743537d44224 (patch) | |
| tree | ae33cc938932257cf57018e2325d19a042f3caf7 /gdb/dwarfread.c | |
| parent | b5727da67b6413c3ab01aacb4004e010d6ebf3b4 (diff) | |
| download | gdb-bbcc95bdb1c2eb0c07778e1a1195743537d44224.zip gdb-bbcc95bdb1c2eb0c07778e1a1195743537d44224.tar.gz gdb-bbcc95bdb1c2eb0c07778e1a1195743537d44224.tar.bz2 | |
* config/m68k/tm-m68kv4.h (DWARF_REG_TO_REGNUM): Define to
correctly map floating point registers numbers.
* dwarfread.c (locval, new_symbol): Handle variables that are
optimized out.
* mdebugread.c: Replace all uses of builtin_type_* with
mdebug_type_*. Define and initialize mdebug_type_*.
* serial.h (serial_close): Add additional argument `really_close'.
(SERIAL_CLOSE): Update serial_close call accordingly.
(SERIAL_UN_FDOPEN): Use serial_close to handle refcnt properly.
* serial.c (serial_close): Handle `really_close'.
* serial.h (scb_base): Moved to serial.c, made static.
* valops.c (value_addr): Don't coerce arrays.
(typecmp): Coerce arrays instead of calling value_addr if necessary.
Diffstat (limited to 'gdb/dwarfread.c')
| -rw-r--r-- | gdb/dwarfread.c | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/gdb/dwarfread.c b/gdb/dwarfread.c index 8c13087..3cc9bd1 100644 --- a/gdb/dwarfread.c +++ b/gdb/dwarfread.c @@ -1,5 +1,5 @@ /* DWARF debugging format support for GDB. - Copyright (C) 1991, 1992, 1993, 1994 Free Software Foundation, Inc. + Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc. Written by Fred Fish at Cygnus Support. Portions based on dbxread.c, mipsread.c, coffread.c, and dwarfread.c from a Data General SVR4 gdb port. @@ -327,6 +327,7 @@ static int dbsize; /* Size of dwarf info in bytes */ static int dbroff; /* Relative offset from start of .debug section */ static char *lnbase; /* Base pointer to line section */ static int isreg; /* Kludge to identify register variables */ +static int optimized_out; /* Kludge to identify optimized out variables */ /* Kludge to identify basereg references. Nonzero if we have an offset relative to a basereg. */ static int offreg; @@ -2151,6 +2152,9 @@ DESCRIPTION Given pointer to a string of bytes that define a location, compute the location and return the value. + A location description containing no atoms indicates that the + object is optimized out. The global optimized_out flag is set for + those, the return value is meaningless. When computing values involving the current value of the frame pointer, the value zero is used, which results in a value relative to the frame @@ -2189,9 +2193,11 @@ locval (loc) stack[stacki] = 0; isreg = 0; offreg = 0; + optimized_out = 1; loc_value_size = TARGET_FT_LONG_SIZE (current_objfile); while (loc < end) { + optimized_out = 0; loc_atom_code = target_to_host (loc, SIZEOF_LOC_ATOM_CODE, GET_UNSIGNED, current_objfile); loc += SIZEOF_LOC_ATOM_CODE; @@ -2934,7 +2940,11 @@ new_symbol (dip, objfile) { SYMBOL_VALUE (sym) = locval (dip -> at_location); add_symbol_to_list (sym, list_in_scope); - if (isreg) + if (optimized_out) + { + SYMBOL_CLASS (sym) = LOC_OPTIMIZED_OUT; + } + else if (isreg) { SYMBOL_CLASS (sym) = LOC_REGISTER; } |