diff options
| author | Janne Blomqvist <jb@gcc.gnu.org> | 2007-07-03 19:50:05 +0300 |
|---|---|---|
| committer | Janne Blomqvist <jb@gcc.gnu.org> | 2007-07-03 19:50:05 +0300 |
| commit | db430f6a2a5997bed3109eff088c4e86020378d0 (patch) | |
| tree | 030df243de19137f076b9781c368c93c9546558d /gcc | |
| parent | 66965e909473fef6462b537cdc4010b79d86159e (diff) | |
| download | gcc-db430f6a2a5997bed3109eff088c4e86020378d0.zip gcc-db430f6a2a5997bed3109eff088c4e86020378d0.tar.gz gcc-db430f6a2a5997bed3109eff088c4e86020378d0.tar.bz2 | |
Fortran frontend:
2007-07-03 Janne Blomqvist <jb@gcc.gnu.org>
* trans-decl.c (gfc_build_builtin_function_decls): Mark
internal_realloc as a malloc function.
libgfortran:
2007-07-03 Janne Blomqvist <jb@gcc.gnu.org>
* libgfortran.h: Mark internal_malloc_size as a malloc function.
* runtime/memory.c (internal_realloc_size): Remove.
(internal_realloc): Call realloc directly instead of
internal_realloc_size.
(allocate_size): Remove.
(allocate): Call malloc directly instead of allocate_size, mark as
malloc function.
From-SVN: r126264
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/trans-decl.c | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 80f1e3c..1ee1862 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2007-07-03 Janne Blomqvist <jb@gcc.gnu.org> + + * trans-decl.c (gfc_build_builtin_function_decls): Mark + internal_realloc as a malloc function. + 2007-07-03 Tobias Burnus <burnus@net-b.de> PR fortran/20888 diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index 1a94982..06842f3 100644 --- a/gcc/fortran/trans-decl.c +++ b/gcc/fortran/trans-decl.c @@ -2276,6 +2276,7 @@ gfc_build_builtin_function_decls (void) (PREFIX("internal_realloc")), pvoid_type_node, 2, pvoid_type_node, gfc_index_int_type_node); + DECL_IS_MALLOC (gfor_fndecl_internal_realloc) = 1; gfor_fndecl_allocate = gfc_build_library_function_decl (get_identifier (PREFIX("allocate")), |