From 45f596d92cb83321003105c2425aafd3793fe867 Mon Sep 17 00:00:00 2001 From: "Steven G. Kargl" Date: Thu, 20 Oct 2016 23:55:19 +0000 Subject: [PATCH] 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 --- gcc/fortran/ChangeLog | 5 +++++ gcc/fortran/array.c | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index e4c7808..b13be23 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 14e20a3..3e0218a 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 ::" */ -- 2.7.4