diff options
author | kargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2016-10-20 23:55:19 +0000 |
---|---|---|
committer | kargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2016-10-20 23:55:19 +0000 |
commit | dd1f87360f17c87312e952f229c6f187dfa6d592 (patch) | |
tree | 235b41435cfb3c4f5f5ff8eec9819d5fc0a6ca9e /gcc/fortran/array.c | |
parent | d7c616dea13cef62166beadf20302ca29865cef4 (diff) | |
download | gcc-dd1f87360f17c87312e952f229c6f187dfa6d592.tar.gz |
2016-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
* array.c (gfc_match_array_constructor): Remove set, but unused
variable.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@241388 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/array.c')
-rw-r--r-- | gcc/fortran/array.c | 4 |
1 files changed, 2 insertions, 2 deletions
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 ::" */ |