Toolchain/binutils-gdb
1
0
Fork 0
forked from Imagelibrary/binutils-gdb
Code Pull Requests Activity

* f-lang.c: Remove duplicate declaration of

Browse Source 
builtin_type_f_integer, and only include it in the f_builtin_types
	once.

	* somread.c (som_symfile_read): Just assign to objfile->obj_private,
	not OBJ_UNWIND_INFO.  Assigning to a cast is a GCC-ism which
	the HP compiler doesn't like.
This commit is contained in:
Jim Kingdon
1994-12-12 21:21:10 +00:00
parent 746d1df4a9
commit c676d8274d
3 changed files with 13 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
gdb/ChangeLog
View File

@@ -1,3 +1,13 @@
Mon Dec 12 13:06:59 1994 Jim Kingdon <kingdon@deneb.cygnus.com>
* f-lang.c: Remove duplicate declaration of
builtin_type_f_integer, and only include it in the f_builtin_types
once.
* somread.c (som_symfile_read): Just assign to objfile->obj_private,
not OBJ_UNWIND_INFO. Assigning to a cast is a GCC-ism which
the HP compiler doesn't like.
Mon Dec 12 12:22:21 1994 Stu Grossman (grossman@cygnus.com) Mon Dec 12 12:22:21 1994 Stu Grossman (grossman@cygnus.com)
* gdbtk.c: New tcl commands: gdb_fetch_registers, * gdbtk.c: New tcl commands: gdb_fetch_registers,

5
gdb/f-lang.c
View File

@@ -373,10 +373,10 @@ static const struct op_print f_op_print_tab[] = {
{ NULL, 0, 0, 0 } { NULL, 0, 0, 0 }
}; };
/* The built-in types of F77. */ /* The built-in types of F77. FIXME: integer*4 is missing, plain
logical is missing (builtin_type_logical is logical*4). */
struct type *builtin_type_f_character; struct type *builtin_type_f_character;
struct type *builtin_type_f_integer;
struct type *builtin_type_f_logical; struct type *builtin_type_f_logical;
struct type *builtin_type_f_logical_s1; struct type *builtin_type_f_logical_s1;
struct type *builtin_type_f_logical_s2; struct type *builtin_type_f_logical_s2;
@@ -393,7 +393,6 @@ struct type *builtin_type_f_void;
struct type ** const (f_builtin_types[]) = struct type ** const (f_builtin_types[]) =
{ {
&builtin_type_f_character, &builtin_type_f_character,
&builtin_type_f_integer,
&builtin_type_f_logical, &builtin_type_f_logical,
&builtin_type_f_logical_s1, &builtin_type_f_logical_s1,
&builtin_type_f_logical_s2, &builtin_type_f_logical_s2,

2
gdb/somread.c
View File

@@ -349,7 +349,7 @@ som_symfile_read (objfile, section_offsets, mainline)
install_minimal_symbols (objfile); install_minimal_symbols (objfile);
/* Force hppa-tdep.c to re-read the unwind descriptors. */ /* Force hppa-tdep.c to re-read the unwind descriptors. */
OBJ_UNWIND_INFO (objfile) = NULL; objfile->obj_private = NULL;
do_cleanups (back_to); do_cleanups (back_to);
} }