From: Steven G. Kargl Date: Thu, 20 Oct 2016 23:55:19 +0000 (+0000) Subject: array.c (gfc_match_array_constructor): Remove set, but unused variable. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=45f596d92cb83321003105c2425aafd3793fe867;p=gcc.git array.c (gfc_match_array_constructor): Remove set, but unused variable. 2016-10-20 Steven G. Kargl * array.c (gfc_match_array_constructor): Remove set, but unused variable. From-SVN: r241388 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index e4c78089432..b13be23b8f1 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2016-10-20 Steven G. Kargl + + * array.c (gfc_match_array_constructor): Remove set, but unused + variable. + 2016-10-20 Andre Vehreschild * class.c (gfc_build_class_symbol): Set the kind of _len to diff --git a/gcc/fortran/array.c b/gcc/fortran/array.c index 14e20a36de5..3e0218a0183 100644 --- a/gcc/fortran/array.c +++ b/gcc/fortran/array.c @@ -1090,7 +1090,7 @@ match gfc_match_array_constructor (gfc_expr **result) { gfc_constructor *c; - gfc_constructor_base head, new_cons; + gfc_constructor_base head; gfc_undo_change_set changed_syms; gfc_expr *expr; gfc_typespec ts; @@ -1115,7 +1115,7 @@ gfc_match_array_constructor (gfc_expr **result) end_delim = " /)"; where = gfc_current_locus; - head = new_cons = NULL; + head = NULL; seen_ts = false; /* Try to match an optional "type-spec ::" */