From c4fae39e150019439df90c4c6dd0d62dfa914f70 Mon Sep 17 00:00:00 2001 From: Jakub Jelinek Date: Sat, 28 Nov 2009 13:13:21 +0100 Subject: trans-common.c (create_common): Remove unused offset variable. * trans-common.c (create_common): Remove unused offset variable. * io.c (gfc_match_wait): Remove unused loc variable. * trans-openmp.c (gfc_trans_omp_clauses): Remove unused old_clauses variable. (gfc_trans_omp_do): Remove unused outermost variable. * iresolve.c (gfc_resolve_alarm_sub, gfc_resolve_fseek_sub): Remove unused status variable. * module.c (number_use_names): Remove unused c variable. (load_derived_extensions): Remove unused nuse variable. * trans-expr.c (gfc_conv_substring): Remove unused var variable. * trans-types.c (gfc_get_array_descr_info): Remove unused offset_off variable. * matchexp.c (match_primary): Remove unused where variable. * trans-intrinsic.c (gfc_conv_intrinsic_bound): Remove unused cond2 variable. (gfc_conv_intrinsic_sizeof): Remove unused source variable. (gfc_conv_intrinsic_transfer): Remove unused stride variable. (gfc_conv_intrinsic_function): Remove unused isym variable. * arith.c (gfc_hollerith2real, gfc_hollerith2complex, gfc_hollerith2logical): Remove unused len variable. * parse.c (parse_derived): Remove unused derived_sym variable. * decl.c (variable_decl): Remove unused old_locus variable. * resolve.c (check_class_members): Remove unused tbp_sym variable. (resolve_ordinary_assign): Remove unused assign_proc variable. (resolve_equivalence): Remove unused value_name variable. * data.c (get_array_index): Remove unused re variable. * trans-array.c (gfc_conv_array_transpose): Remove unused src_info variable. (gfc_conv_resolve_dependencies): Remove unused aref and temp_dim variables. (gfc_conv_loop_setup): Remove unused dim and len variables. (gfc_walk_variable_expr): Remove unused head variable. * match.c (match_typebound_call): Remove unused var variable. * intrinsic.c (gfc_convert_chartype): Remove unused from_ts variable. From-SVN: r154722 --- gcc/fortran/module.c | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'gcc/fortran/module.c') diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index 43acd450062..36095a2b722 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -741,8 +741,7 @@ static int number_use_names (const char *name, bool interface) { int i = 0; - const char *c; - c = find_use_name_n (name, &i, interface); + find_use_name_n (name, &i, interface); return i; } @@ -3977,7 +3976,7 @@ load_equiv (void) static void load_derived_extensions (void) { - int symbol, nuse, j; + int symbol, j; gfc_symbol *derived; gfc_symbol *dt; gfc_symtree *st; @@ -4013,7 +4012,6 @@ load_derived_extensions (void) mio_internal_string (module); /* Only use one use name to find the symbol. */ - nuse = number_use_names (name, false); j = 1; p = find_use_name_n (name, &j, false); if (p) -- cgit v1.2.1