diff options
| author | Tobias Burnus <burnus@net-b.de> | 2013-03-01 17:39:43 +0100 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2013-03-01 17:39:43 +0100 |
| commit | 2b62c97f038337ffd7522bca3eef22a346ca5306 (patch) | |
| tree | 819f540f06995e94cfeff41ddd522ca9be514800 /gcc/fortran/iresolve.c | |
| parent | fa585637b05894c80d44957f47317653d8cd91a7 (diff) | |
| download | gcc-2b62c97f038337ffd7522bca3eef22a346ca5306.zip gcc-2b62c97f038337ffd7522bca3eef22a346ca5306.tar.gz gcc-2b62c97f038337ffd7522bca3eef22a346ca5306.tar.bz2 | |
iresolve.c (resolve_bound): Use gfc_get_string instead of xstrdup.
2013-03-01 Tobias Burnus <burnus@net-b.de>
* iresolve.c (resolve_bound): Use gfc_get_string instead of xstrdup.
* symbol.c (free_components): Free proc-pointer components.
From-SVN: r196387
Diffstat (limited to 'gcc/fortran/iresolve.c')
| -rw-r--r-- | gcc/fortran/iresolve.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/iresolve.c b/gcc/fortran/iresolve.c index 36e5363..5b2f8c7 100644 --- a/gcc/fortran/iresolve.c +++ b/gcc/fortran/iresolve.c @@ -140,7 +140,7 @@ resolve_bound (gfc_expr *f, gfc_expr *array, gfc_expr *dim, gfc_expr *kind, } } - f->value.function.name = xstrdup (name); + f->value.function.name = gfc_get_string (name); } |