diff options
author | Jim Meyering <meyering@redhat.com> | 2011-04-18 19:21:05 +0000 |
---|---|---|
committer | Jim Meyering <meyering@gcc.gnu.org> | 2011-04-18 19:21:05 +0000 |
commit | 513db953ec58e5913e0bf325947ee9e03d2ea38d (patch) | |
tree | 0ab058f1627dfbbc50e9d116b4b91c32a98caf15 /gcc | |
parent | cede9502322f2707ea29212fb115116be3c7d5a8 (diff) | |
download | gcc-513db953ec58e5913e0bf325947ee9e03d2ea38d.zip gcc-513db953ec58e5913e0bf325947ee9e03d2ea38d.tar.gz gcc-513db953ec58e5913e0bf325947ee9e03d2ea38d.tar.bz2 |
remove now-unused definition of gfc_free
* misc.c (gfc_free): Remove function.
* gfortran.h (gfc_free): Remove its prototype.
From-SVN: r172667
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/fortran/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/fortran/gfortran.h | 1 | ||||
-rw-r--r-- | gcc/fortran/misc.c | 10 |
3 files changed, 6 insertions, 11 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 51e2515..f6e7d47 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,11 @@ 2011-04-18 Jim Meyering <meyering@redhat.com> + remove now-unused definition of gfc_free + * misc.c (gfc_free): Remove function. + * gfortran.h (gfc_free): Remove its prototype. + +2011-04-18 Jim Meyering <meyering@redhat.com> + convert each use of gfc_free (p) to free (p) Do that by running this command: perl -pi -e 's/\bgfc_free ?\(/free (/' \ diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h index 49fbd1f..ce11c07 100644 --- a/gcc/fortran/gfortran.h +++ b/gcc/fortran/gfortran.h @@ -2370,7 +2370,6 @@ void gfc_end_source_files (void); /* misc.c */ void *gfc_getmem (size_t) ATTRIBUTE_MALLOC; -void gfc_free (void *); int gfc_terminal_width (void); void gfc_clear_ts (gfc_typespec *); FILE *gfc_open_file (const char *); diff --git a/gcc/fortran/misc.c b/gcc/fortran/misc.c index 76dd2ef..a54ffc0 100644 --- a/gcc/fortran/misc.c +++ b/gcc/fortran/misc.c @@ -42,16 +42,6 @@ gfc_getmem (size_t n) } -void -gfc_free (void *p) -{ - /* The parentheses around free are needed in order to call not - the redefined free of gfortran.h. */ - if (p != NULL) - (free) (p); -} - - /* Get terminal width. */ int |