Commit dd28cdaa by Tobias Burnus Committed by Tobias Burnus

resolve.c (get_temp_from_expr): Don't set FL_VARIABLE twice.

2013-06-20  Tobias Burnus  <burnus@net-b.de>

        * resolve.c (get_temp_from_expr): Don't set FL_VARIABLE twice.

From-SVN: r200234
parent 76764e7b
2013-06-20 Tobias Burnus <burnus@net-b.de>
* resolve.c (get_temp_from_expr): Don't set FL_VARIABLE twice.
2013-06-17 Tobias Burnus <burnus@net-b.de> 2013-06-17 Tobias Burnus <burnus@net-b.de>
* gfortran.h (gfc_option_t): Add fpe_summary. * gfortran.h (gfc_option_t): Add fpe_summary.
......
...@@ -9311,7 +9311,6 @@ get_temp_from_expr (gfc_expr *e, gfc_namespace *ns) ...@@ -9311,7 +9311,6 @@ get_temp_from_expr (gfc_expr *e, gfc_namespace *ns)
tmp->n.sym->attr.dimension = 0; tmp->n.sym->attr.dimension = 0;
gfc_set_sym_referenced (tmp->n.sym); gfc_set_sym_referenced (tmp->n.sym);
gfc_add_flavor (&tmp->n.sym->attr, FL_VARIABLE, name, NULL);
gfc_commit_symbol (tmp->n.sym); gfc_commit_symbol (tmp->n.sym);
e = gfc_lval_expr_from_sym (tmp->n.sym); e = gfc_lval_expr_from_sym (tmp->n.sym);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment