diff --git a/gcc/except.c b/gcc/except.c
index 65ba6c5ac5040dfca60c1e0317d9cbec5ae7b1df..bf4d8fb3170b0b215075c924973cc10664aa7738 100644
--- a/gcc/except.c
+++ b/gcc/except.c
@@ -305,7 +305,6 @@ static void sjlj_build_landing_pads		PARAMS ((void));
 static hashval_t ehl_hash			PARAMS ((const PTR));
 static int ehl_eq				PARAMS ((const PTR,
 							 const PTR));
-static void ehl_free				PARAMS ((PTR));
 static void add_ehl_entry			PARAMS ((rtx,
 							 struct eh_region *));
 static void remove_exception_handler_label	PARAMS ((rtx));
@@ -1186,14 +1185,6 @@ add_ehl_entry (label, region)
   *slot = entry;
 }
 
-static void
-ehl_free (pentry)
-     PTR pentry;
-{
-  struct ehl_map_entry *entry = (struct ehl_map_entry *)pentry;
-  LABEL_PRESERVE_P (entry->label) = 0;
-}
-
 void
 find_exception_handler_labels ()
 {