aboutsummaryrefslogtreecommitdiff
path: root/gdb/f-valprint.c
diff options
context:
space:
mode:
authorMichael Snyder <msnyder@vmware.com>2010-05-07 00:28:32 +0000
committerMichael Snyder <msnyder@vmware.com>2010-05-07 00:28:32 +0000
commit9216103f920df7d9399aed10328cabd314cb8f47 (patch)
tree834fb17539b3b1fbf0890bc860ddc2904bc85427 /gdb/f-valprint.c
parent34fa1d9dd20c6ef924f0f935a6325a1873a0ecb5 (diff)
downloadgdb-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.c3
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;