diff options
| author | Jason Molenda <jmolenda@apple.com> | 1998-03-04 23:35:30 +0000 |
|---|---|---|
| committer | Jason Molenda <jmolenda@apple.com> | 1998-03-04 23:35:30 +0000 |
| commit | d7363521cf56276cde08ae8911cb405c33ccda97 (patch) | |
| tree | 7570b99ecbc279f6c2e6cc83bc5fd4a1b89be9f6 /gdb | |
| parent | 9ce23bf9510da915a612c550a8d4e32da9840a26 (diff) | |
| download | gdb-d7363521cf56276cde08ae8911cb405c33ccda97.zip gdb-d7363521cf56276cde08ae8911cb405c33ccda97.tar.gz gdb-d7363521cf56276cde08ae8911cb405c33ccda97.tar.bz2 | |
Wed Mar 4 15:34:49 1998 Jason Molenda (crash@bugshack.cygnus.com)
* gdbtk.c (gdb_listfiles): Allocate space for 'files' dynamically.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/ChangeLog | 11 | ||||
| -rw-r--r-- | gdb/gdbtk.c | 17 |
2 files changed, 23 insertions, 5 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 65458e6..2f355de 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,7 @@ +Wed Mar 4 15:34:49 1998 Jason Molenda (crash@bugshack.cygnus.com) + + * gdbtk.c (gdb_listfiles): Allocate space for 'files' dynamically. + Wed Mar 4 01:39:08 1998 Ron Unrau <runrau@cygnus.com> * elfread.c (elf_symtab_read): merge SYMBOL_IS_SPECIAL into @@ -6,13 +10,12 @@ Wed Mar 4 01:39:08 1998 Ron Unrau <runrau@cygnus.com> Tue Mar 3 17:19:08 1998 John Metzler <jmetzler@cygnus.com> - * config/mips/tm-vr4xxx.h : implements vr4111 as saparate from 4300 - * config/mips/vr4xxx.tm : implements vr4111 as separate from 4300 + * config/mips/tm-vr4xxx.h: implements vr4111 as saparate from 4300 + * config/mips/vr4xxx.tm: implements vr4111 as separate from 4300 * configure.tgt: Recognise mips64vr4111-*-elf as vr4xxx - * dwarfread.c(read_tag_pointer_type): Pointer sizes now come from + * dwarfread.c (read_tag_pointer_type): Pointer sizes now come from TARGET_PTR_BIT rather from sizeof(char *) on host. - Tue Mar 3 14:37:02 1998 Peter Schauer (pes@regent.e-technik.tu-muenchen.de) * alpha-nat.c (fetch_osf_core_registers): Renamed from diff --git a/gdb/gdbtk.c b/gdb/gdbtk.c index 6041f71..81338a1 100644 --- a/gdb/gdbtk.c +++ b/gdb/gdbtk.c @@ -1217,10 +1217,14 @@ gdb_listfiles (clientData, interp, objc, objv) struct objfile *objfile; struct partial_symtab *psymtab; struct symtab *symtab; - char *lastfile, *pathname, *files[1000]; + char *lastfile, *pathname, **files; + int files_size; int i, numfiles = 0, len = 0; Tcl_Obj *mylist; + files_size = 1000; + files = (char **) xmalloc (sizeof (char **) * files_size); + if (objc > 2) { Tcl_WrongNumArgs (interp, 1, objv, "Usage: gdb_listfiles ?pathname?"); @@ -1233,6 +1237,11 @@ gdb_listfiles (clientData, interp, objc, objv) ALL_PSYMTABS (objfile, psymtab) { + if (numfiles == files_size) + { + files_size = files_size * 2; + files = (char **) xrealloc (files, sizeof (char **) * files_size); + } if (len == 0) { if (psymtab->filename) @@ -1246,6 +1255,11 @@ gdb_listfiles (clientData, interp, objc, objv) ALL_SYMTABS (objfile, symtab) { + if (numfiles == files_size) + { + files_size = files_size * 2; + files = (char **) xrealloc (files, sizeof (char **) * files_size); + } if (len == 0) { if (symtab->filename) @@ -1267,6 +1281,7 @@ gdb_listfiles (clientData, interp, objc, objv) lastfile = files[i]; } Tcl_SetObjResult (interp, mylist); + free (files); return TCL_OK; } |