array.c (gfc_match_array_constructor): Remove set, but unused variable.
2016-10-20 Steven G. Kargl <kargl@gcc.gnu.org> * array.c (gfc_match_array_constructor): Remove set, but unused variable. From-SVN: r241388
This commit is contained in:
parent
a7cfe83677
commit
45f596d92c
@ -1,3 +1,8 @@
|
||||
2016-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
|
||||
|
||||
* array.c (gfc_match_array_constructor): Remove set, but unused
|
||||
variable.
|
||||
|
||||
2016-10-20 Andre Vehreschild <vehre@gcc.gnu.org>
|
||||
|
||||
* class.c (gfc_build_class_symbol): Set the kind of _len to
|
||||
|
@ -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 ::" */
|
||||
|
Loading…
x
Reference in New Issue
Block a user