diff options
Diffstat (limited to 'gcc/fortran/trans.c')
| -rw-r--r-- | gcc/fortran/trans.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans.c b/gcc/fortran/trans.c index e266be8..6fa62fb 100644 --- a/gcc/fortran/trans.c +++ b/gcc/fortran/trans.c @@ -405,7 +405,7 @@ gfc_trans_runtime_error_vararg (bool error, locus* where, const char* msgid, gfc_free(message); /* Build the argument array. */ - argarray = (tree *) alloca (sizeof (tree) * (nargs + 2)); + argarray = XALLOCAVEC (tree, nargs + 2); argarray[0] = arg; argarray[1] = arg2; for (i = 0; i < nargs; i++) |