mirror/binutils-gdb
2
0
Fork 0
mirror of https://sourceware.org/git/binutils-gdb.git synced 2024-11-27 03:51:15 +08:00
Code Issues Packages Projects Releases Wiki Activity

2010-05-06 Michael Snyder <msnyder@vmware.com>

Browse Source 
* p-typeprint.c (pascal_type_print_base): Delete unused variable.
	(pascal_type_print_varspec_prefix): Delete unused variable.
	* f-typeprint.c (f_type_print_base): Delete unused variable.
	(f_type_print_varspec_suffix): Delete unused variable.
	* m2-typeprint.c (m2_print_type): Delete unused variable.
	(m2_long_set): Delete unused variable.
	* ada-valprint.c (ada_val_print_1): Delete unused variable.
	* d-valprint.c (dynamic_array_type): Delete unused variable.
	* f-valprint.c (f77_get_dynamic_length_of_aggregate):
	Delete unused variable.
	(f77_create_arrayprint_offset_tbl): Delete unused variable.
	* m2-valprint.c (m2_val_print): Delete unused variable.
This commit is contained in:
Michael Snyder 2010-05-07 00:28:32 +00:00
parent 34fa1d9dd2
commit 9216103f92
8 changed files with 16 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
gdb/ChangeLog
View File

@ -1,5 +1,18 @@
2010-05-06 Michael Snyder <msnyder@vmware.com>
* p-typeprint.c (pascal_type_print_base): Delete unused variable.
(pascal_type_print_varspec_prefix): Delete unused variable.
* f-typeprint.c (f_type_print_base): Delete unused variable.
(f_type_print_varspec_suffix): Delete unused variable.
* m2-typeprint.c (m2_print_type): Delete unused variable.
(m2_long_set): Delete unused variable.
* ada-valprint.c (ada_val_print_1): Delete unused variable.
* d-valprint.c (dynamic_array_type): Delete unused variable.
* f-valprint.c (f77_get_dynamic_length_of_aggregate):
Delete unused variable.
(f77_create_arrayprint_offset_tbl): Delete unused variable.
* m2-valprint.c (m2_val_print): Delete unused variable.
* ui-out.c (ui_out_field_int): Delete unused variable.
(ui_out_field_fmt_int): Delete unused variable.
* varobj.c (varobj_list_children): Delete unused variable.

1
gdb/ada-valprint.c
View File

@ -681,7 +681,6 @@ ada_val_print_1 (struct type *type, const gdb_byte *valaddr0,
unsigned int len;
int i;
struct type *elttype;
unsigned int eltlen;
LONGEST val;
const gdb_byte *valaddr = valaddr0 + embedded_offset;

1
gdb/d-valprint.c
View File

@ -42,7 +42,6 @@ dynamic_array_type (struct type *type, const gdb_byte *valaddr,
struct type *elttype;
struct type *true_type;
struct type *ptr_type;
struct type *range_type;
const gdb_byte *ptraddr;
struct value *val;
int length;

4
gdb/f-typeprint.c
View File

@ -153,7 +153,7 @@ f_type_print_varspec_suffix (struct type *type, struct ui_file *stream,
int arrayprint_recurse_level)
{
int upper_bound, lower_bound;
int retcode;
/* No static variables are permitted as an error call may occur during
execution of this function. */
@ -258,9 +258,7 @@ void
f_type_print_base (struct type *type, struct ui_file *stream, int show,
int level)
{
int retcode;
int upper_bound;
int index;
QUIT;

3
gdb/f-valprint.c
View File

@ -92,7 +92,6 @@ f77_get_dynamic_length_of_aggregate (struct type *type)
{
int upper_bound = -1;
int lower_bound = 1;
int retcode;
/* Recursively go all the way down into a possibly multi-dimensional
F77 array and get the bounds. For simple arrays, this is pretty
@ -126,7 +125,7 @@ f77_create_arrayprint_offset_tbl (struct type *type, struct ui_file *stream)
struct type *tmp_type;
int eltlen;
int ndimen = 1;
int upper, lower, retcode;
int upper, lower;
tmp_type = type;

3
gdb/m2-typeprint.c
View File

@ -71,7 +71,6 @@ m2_print_type (struct type *type, char *varstring, struct ui_file *stream,
int show, int level)
{
enum type_code code;
int demangled_args;
CHECK_TYPEDEF (type);
@ -424,8 +423,6 @@ m2_is_long_set_of_type (struct type *type, struct type **of_type)
static int
m2_long_set (struct type *type, struct ui_file *stream, int show, int level)
{
struct type *index_type;
struct type *range_type;
struct type *of_type;
int i;
int len = TYPE_NFIELDS (type);

2
gdb/m2-valprint.c
View File

@ -322,8 +322,6 @@ m2_val_print (struct type *type, const gdb_byte *valaddr, int embedded_offset,
unsigned len;
struct type *elttype;
unsigned eltlen;
int length_pos, length_size, string_pos;
int char_size;
LONGEST val;
CORE_ADDR addr;

3
gdb/p-typeprint.c
View File

@ -205,7 +205,6 @@ void
pascal_type_print_varspec_prefix (struct type *type, struct ui_file *stream,
int show, int passed_a_ptr)
{
char *name;
if (type == 0)
return;
@ -618,7 +617,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
struct fn_field *f = TYPE_FN_FIELDLIST1 (type, i);
int j, len2 = TYPE_FN_FIELDLIST_LENGTH (type, i);
char *method_name = TYPE_FN_FIELDLIST_NAME (type, i);
char *name = type_name_no_tag (type);
/* this is GNU C++ specific
how can we know constructor/destructor?
It might work for GNU pascal */