diff options
-rw-r--r-- | gdb/ChangeLog | 22 | ||||
-rw-r--r-- | gdb/remote-es.c | 2 | ||||
-rw-r--r-- | gdb/stabsread.c | 64 |
3 files changed, 56 insertions, 32 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 81a202a..315e42a 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,9 @@ +Tue Jul 30 17:57:46 1996 Stan Shebs <shebs@andros.cygnus.com> + + * stabsread.c (get_substring): Declare second arg as int. + + * remote-es.c: Include gdb_string.h after defs.h. + Mon Jul 29 21:13:20 1996 Fred Fish <fnf@cygnus.com> * rs6000-tdep.c (push_arguments): Remove unused variable "pc". @@ -212,7 +218,9 @@ Fri Jul 26 14:07:37 1996 Ian Lance Taylor <ian@cygnus.com> * printcmd.c (_initialize_printcmd): Initialize tm_print_insn_info.flavour. +start-sanitize-gdbtk * gdbtk.c (gdb_disassemble): Initialize di.flavour. +end-sanitize-gdbtk Thu Jul 25 19:41:31 1996 Fred Fish <fnf@cygnus.com> @@ -254,7 +262,6 @@ Thu Jul 25 19:41:31 1996 Fred Fish <fnf@cygnus.com> (strerror): Ditto. * f-valprint.c (f77_print_array_1): Remove extra arg that was being passed to f77_print_array_1. - * gdbtk.c (register_changed_p): Remove unused local variable "buf". * gdbtypes.c (add_name): Remove unused variables lenstrlen and lenstr. * scm-exp.c (scm_istr2int): Remove unused variable "j". (scm_parse): Remove unused variable "str". @@ -496,6 +503,7 @@ Thu Jul 25 19:41:31 1996 Fred Fish <fnf@cygnus.com> (debug_to_notice_signals): Ditto. (debug_to_thread_alive): Ditto. (debug_to_stop): Ditto. +start-sanitize-gdbtk * gdbtk.c (null_routine): Ditto. (gdbtk_flush): Ditto. (gdbtk_fputs): Ditto. @@ -533,6 +541,7 @@ Thu Jul 25 19:41:31 1996 Fred Fish <fnf@cygnus.com> (gdbtk_call_command): Ditto. (tk_command_loop): Ditto. (gdbtk_init): Ditto. +end-sanitize-gdbtk * breakpoint.h (set_breakpoint_sal): Ditto. * remote-utils.c (usage): Ditto. * remote.c (set_thread): Ditto. @@ -721,9 +730,11 @@ Thu Jul 25 19:41:31 1996 Fred Fish <fnf@cygnus.com> uninitialized. * utils.c (vfprintf_maybe_filtered): Change second arg from "char *" to "const char *". +start-sanitize-gdbtk * gdbtk.c (gdb_fetch_registers): Cast fourth arg to map_arg_registers to proper pointer type, from int. (gdbtk_query): Change first arg to "const char *" from "char *". +end-sanitize-gdbtk * infptrace.c (udot_info): Add two dummy args so that the type is correct for passing to add_info. * f-lang.c (saved_fcn): Move decl to head of file so it can be used @@ -750,6 +761,9 @@ Thu Jul 25 19:41:31 1996 Fred Fish <fnf@cygnus.com> * eval.c (init_array_element): Declare previously undeclared last two args as LONGEST. * dcache.c (dcache_xfer_memory): Change xfunc decls to prototype form. +start-sanitize-gdbtk + * gdbtk.c (register_changed_p): Remove unused local variable "buf". +end-sanitize-gdbtk Thu Jul 25 16:11:54 1996 Doug Evans <dje@canuck.cygnus.com> @@ -766,12 +780,14 @@ Mon Jul 22 18:13:27 1996 Stu Grossman (grossman@critters.cygnus.com) partial-stab.h. * stabsread.h (end_psymtab): Add textlow_not_set arg to prototype. +start-sanitize-gdbtk Sat Jul 20 17:46:40 1996 Fred Fish <fnf@cygnus.com> * gdbtk.tcl (files_command): Reorder the binding tags for the listbox widget to avoid referencing the listbox after the containing widget has been destroyed by the action of a previous binding. +end-sanitize-gdbtk Sat Jul 20 10:41:06 1996 Fred Fish <fnf@cygnus.com> @@ -779,6 +795,7 @@ Sat Jul 20 10:41:06 1996 Fred Fish <fnf@cygnus.com> to "struct fileinfo" to avoid conflict with "struct file" in <sys/file.h> on HPUX and Solaris. +start-sanitize-gdbtk Sat Jul 20 10:09:28 1996 Fred Fish <fnf@cygnus.com> * gdbtk.tcl (delete_expr): Unset corresponding element of @@ -786,6 +803,7 @@ Sat Jul 20 10:09:28 1996 Fred Fish <fnf@cygnus.com> (create_expr_window): Initialize expr_num, delete_expr_num, and expr_update_list here when each new expression window is created, rather than once at startup. +end-sanitize-gdbtk Fri Jul 19 14:05:57 1996 Stan Shebs <shebs@andros.cygnus.com> @@ -832,8 +850,10 @@ Mon Jul 15 16:44:05 1996 Stu Grossman (grossman@critters.cygnus.com) * defs.h printcmd.c: Create global disassemble_info structure tm_print_insn_info. +start-sanitize-gdbtk * gdbtk.c (gdb_disassemble): Setup di.mach from tm_print_insn_info.mach, and set endian from TARGET_BYTE_ORDER. +end-sanitize-gdbtk * i386-tdep.c (set_assembly_language_command): set tm_print_insn_info.mach to the appropriate value for 386 or 8086 disassembly. diff --git a/gdb/remote-es.c b/gdb/remote-es.c index b4e60ef..7aa4e9c 100644 --- a/gdb/remote-es.c +++ b/gdb/remote-es.c @@ -96,10 +96,10 @@ STP #include <sys/file.h> #include <errno.h> #include <ctype.h> -#include "gdb_string.h" #include <setjmp.h> #include <fcntl.h> #include "defs.h" +#include "gdb_string.h" #include "frame.h" #include "inferior.h" #include "target.h" diff --git a/gdb/stabsread.c b/gdb/stabsread.c index a9ac480..8c03a6f 100644 --- a/gdb/stabsread.c +++ b/gdb/stabsread.c @@ -80,7 +80,7 @@ read_one_struct_field PARAMS ((struct field_info *, char **, char *, struct type *, struct objfile *)); static char * -get_substring PARAMS ((char **, char)); +get_substring PARAMS ((char **, int)); static struct type * dbx_alloc_type PARAMS ((int [2], struct objfile *)); @@ -538,16 +538,17 @@ read_type_number (pp, typenums) /* This code added to support parsing of ARM/Cfront stabs strings */ -/* get substring from string up to char c - advance string pointer past suibstring */ +/* Get substring from string up to char c, advance string pointer past + suibstring. */ + static char * -get_substring(p, c) +get_substring (p, c) char ** p; - char c; + int c; { - char * str; + char *str; str = *p; - *p = strchr(*p,c); + *p = strchr (*p, c); if (*p) { **p = 0; @@ -558,35 +559,36 @@ get_substring(p, c) return str; } -/* Physname gets strcat'd onto sname in order to recreate the mangled name - (see funtion gdb_mangle_name in gdbtypes.c). For cfront, make the physname - look like that of g++ - take out the initial mangling +/* Physname gets strcat'd onto sname in order to recreate the mangled + name (see funtion gdb_mangle_name in gdbtypes.c). For cfront, make + the physname look like that of g++ - take out the initial mangling eg: for sname="a" and fname="foo__1aFPFs_i" return "FPFs_i" */ + static char * -get_cfront_method_physname(fname) - char * fname; +get_cfront_method_physname (fname) + char *fname; { - int len=0; + int len = 0; /* FIXME would like to make this generic for g++ too, but that is already handled in read_member_funcctions */ char * p = fname; /* search ahead to find the start of the mangled suffix */ if (*p == '_' && *(p+1)=='_') /* compiler generated; probably a ctor/dtor */ - p+=2; - while (p && ((p+1) - fname) < strlen(fname) && *(p+1)!='_') - p = strchr(p,'_'); - if (!(p && *p=='_' && *(p+1)=='_')) - error("Invalid mangled function name %s",fname); - p+=2; /* advance past '__' */ + p += 2; + while (p && ((p+1) - fname) < strlen (fname) && *(p+1) != '_') + p = strchr (p, '_'); + if (!(p && *p == '_' && *(p+1) == '_')) + error ("Invalid mangled function name %s",fname); + p += 2; /* advance past '__' */ /* struct name length and name of type should come next; advance past it */ - while (isdigit(*p)) + while (isdigit (*p)) { - len = len*10 + (*p - '0'); + len = len * 10 + (*p - '0'); p++; } - p+=len; + p += len; return p; } @@ -598,12 +600,13 @@ get_cfront_method_physname(fname) A:ZcA;;foopri__1AFv foopro__1AFv __ct__1AFv __ct__1AFRC1A foopub__1AFv ;;; ^ */ + static int -read_cfront_baseclasses(fip, pp, type, objfile) +read_cfront_baseclasses (fip, pp, type, objfile) struct field_info *fip; - struct objfile * objfile; + struct objfile *objfile; char ** pp; - struct type * type; + struct type *type; { static struct complaint msg_unknown = {"\ Unsupported token in stabs string %s.\n", @@ -611,21 +614,22 @@ read_cfront_baseclasses(fip, pp, type, objfile) static struct complaint msg_notfound = {"\ Unable to find base type for %s.\n", 0, 0}; - int bnum=0; + int bnum = 0; char * p; int i; struct nextfield *new; - if (**pp==';') /* no base classes; return */ + if (**pp == ';') /* no base classes; return */ { ++(*pp); return 1; } /* first count base classes so we can allocate space before parsing */ - for (p = *pp; p && *p && *p!=';'; p++) + for (p = *pp; p && *p && *p != ';'; p++) { - if (*p==' ') bnum++; + if (*p == ' ') + bnum++; } bnum++; /* add one more for last one */ @@ -638,12 +642,12 @@ read_cfront_baseclasses(fip, pp, type, objfile) { int num_bytes = B_BYTES (TYPE_N_BASECLASSES (type)); char *pointer; + pointer = (char *) TYPE_ALLOC (type, num_bytes); TYPE_FIELD_VIRTUAL_BITS (type) = (B_TYPE *) pointer; } B_CLRALL (TYPE_FIELD_VIRTUAL_BITS (type), TYPE_N_BASECLASSES (type)); - for (i = 0; i < TYPE_N_BASECLASSES (type); i++) { new = (struct nextfield *) xmalloc (sizeof (struct nextfield)); |