diff options
| author | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-04-19 17:42:51 +0000 |
|---|---|---|
| committer | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-04-19 17:42:51 +0000 |
| commit | dfa3fb6ab6ee3a6ad8c96ab3ca796fb645cc6afd (patch) | |
| tree | 8ec237a8fb4cca5124b47fb04acac619c6387e9a /gcc/fortran/trans-expr.c | |
| parent | 046f323efd9149bb5d2d5638466e98ed238b7635 (diff) | |
| download | ppe42-gcc-dfa3fb6ab6ee3a6ad8c96ab3ca796fb645cc6afd.tar.gz ppe42-gcc-dfa3fb6ab6ee3a6ad8c96ab3ca796fb645cc6afd.zip | |
Replace gfc_getmem with XCNEW, XCNEWVEC or xcalloc
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@172728 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/trans-expr.c')
| -rw-r--r-- | gcc/fortran/trans-expr.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/trans-expr.c b/gcc/fortran/trans-expr.c index af19d32867a..73d8a5f6869 100644 --- a/gcc/fortran/trans-expr.c +++ b/gcc/fortran/trans-expr.c @@ -3957,8 +3957,8 @@ gfc_conv_statement_function (gfc_se * se, gfc_expr * expr) n = 0; for (fargs = sym->formal; fargs; fargs = fargs->next) n++; - saved_vars = (gfc_saved_var *)gfc_getmem (n * sizeof (gfc_saved_var)); - temp_vars = (tree *)gfc_getmem (n * sizeof (tree)); + saved_vars = XCNEWVEC (gfc_saved_var, n); + temp_vars = XCNEWVEC (tree, n); for (fargs = sym->formal, n = 0; fargs; fargs = fargs->next, n++) { |
