procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

resolve.c (get_temp_from_expr): Change mangling to start always with a _.

Browse source 
2013-05-22  Tobias Burnus  <burnus@net-b.de>

        * resolve.c (get_temp_from_expr): Change mangling to
        start always with a _.

From-SVN: r199215
This commit is contained in:
Tobias Burnus 2013-05-22 21:24:29 +02:00 • committed by Tobias Burnus
parent ead3d0757a
commit bbf38bcf2d
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/fortran/ChangeLog
View file

@ -1,3 +1,8 @@
2013-05-22 Tobias Burnus <burnus@net-b.de>
* resolve.c (get_temp_from_expr): Change mangling to
start always with a _.
2013-05-22 Tobias Burnus <burnus@net-b.de>
* resolve.c (get_temp_from_expr): Fix temp var mangling.

2
gcc/fortran/resolve.c
View file

@ -9254,7 +9254,7 @@ get_temp_from_expr (gfc_expr *e, gfc_namespace *ns)
gfc_array_ref *aref;
gfc_ref *ref;
sprintf (name, "DA" GFC_PREFIX("%d"), serial++);
sprintf (name, GFC_PREFIX("DA%d"), serial++);
gfc_get_sym_tree (name, ns, &tmp, false);
gfc_add_type (tmp->n.sym, &e->ts, NULL);