aboutsummaryrefslogtreecommitdiff
path: root/gdb/f-typeprint.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-typeprint.c
parent34fa1d9dd20c6ef924f0f935a6325a1873a0ecb5 (diff)
downloadfsf-binutils-gdb-9216103f920df7d9399aed10328cabd314cb8f47.zip
fsf-binutils-gdb-9216103f920df7d9399aed10328cabd314cb8f47.tar.gz
fsf-binutils-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-typeprint.c')
-rw-r--r--gdb/f-typeprint.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/gdb/f-typeprint.c b/gdb/f-typeprint.c
index 0332932..0cee7d9 100644
--- a/gdb/f-typeprint.c
+++ b/gdb/f-typeprint.c
@@ -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;