diff options
| author | Tobias Burnus <burnus@net-b.de> | 2012-08-27 22:51:52 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2012-08-27 22:51:52 +0200 |
| commit | d7920cf0719e3cc28e61a98d640f6d1cb46d797e (patch) | |
| tree | 092fbbcb6b239972d8e2bd5aaf151a519254118d /gcc/fortran/trans-expr.c | |
| parent | 655c54442de3358d0880de6d23b17223775eccd6 (diff) | |
| download | gcc-d7920cf0719e3cc28e61a98d640f6d1cb46d797e.zip gcc-d7920cf0719e3cc28e61a98d640f6d1cb46d797e.tar.gz gcc-d7920cf0719e3cc28e61a98d640f6d1cb46d797e.tar.bz2 | |
re PR fortran/54384 (gfortran memory leaks)
2012-08-27 Tobias Burnus <burnus@net-b.de>
PR fortran/54384
* resolve.c (gfc_resolve_character_operator): Free temporary
variables.
* trans-expr.c (gfc_conv_statement_function): Ditto.
From-SVN: r190731
Diffstat (limited to 'gcc/fortran/trans-expr.c')
| -rw-r--r-- | gcc/fortran/trans-expr.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/trans-expr.c b/gcc/fortran/trans-expr.c index 3ab7d5d..84a4b34 100644 --- a/gcc/fortran/trans-expr.c +++ b/gcc/fortran/trans-expr.c @@ -5080,6 +5080,7 @@ gfc_conv_statement_function (gfc_se * se, gfc_expr * expr) /* Restore the original variables. */ for (fargs = sym->formal, n = 0; fargs; fargs = fargs->next, n++) gfc_restore_sym (fargs->sym, &saved_vars[n]); + free (temp_vars); free (saved_vars); } |