diff options
author | Michael Snyder <msnyder@vmware.com> | 2010-05-07 00:28:32 +0000 |
---|---|---|
committer | Michael Snyder <msnyder@vmware.com> | 2010-05-07 00:28:32 +0000 |
commit | 9216103f920df7d9399aed10328cabd314cb8f47 (patch) | |
tree | 834fb17539b3b1fbf0890bc860ddc2904bc85427 /gdb/f-valprint.c | |
parent | 34fa1d9dd20c6ef924f0f935a6325a1873a0ecb5 (diff) | |
download | gdb-9216103f920df7d9399aed10328cabd314cb8f47.zip gdb-9216103f920df7d9399aed10328cabd314cb8f47.tar.gz gdb-9216103f920df7d9399aed10328cabd314cb8f47.tar.bz2 |
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.
Diffstat (limited to 'gdb/f-valprint.c')
-rw-r--r-- | gdb/f-valprint.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gdb/f-valprint.c b/gdb/f-valprint.c index 9bd3640..6760308 100644 --- a/gdb/f-valprint.c +++ b/gdb/f-valprint.c @@ -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; |