remove now-unused definition of gfc_free

* misc.c (gfc_free): Remove function.
* gfortran.h (gfc_free): Remove its prototype.

From-SVN: r172667

gcc/fortran/ChangeLog

 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 (/' \

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 *);

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