diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index e21e363f1ce14350c5059939822c64b63ba7f0d3..34fc58a7a20aa6bedf4b70b26160b9c6d44229ea 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2002-01-17  Jason Merrill  <jason@redhat.com>
+
+	* except.c (add_partial_entry): Remove backwards compatibility code.
+	(end_protect_partials): Likewise.
+
 2002-01-17  Jakub Jelinek  <jakub@redhat.com>
 
 	* config/ia64/ia64.md (prologue_use): New.
diff --git a/gcc/except.c b/gcc/except.c
index 2ce69f2c05dc669e415cd9c43729aa68a446c902..606c0e64267d3b4cfdfece44b7201331562817f9 100644
--- a/gcc/except.c
+++ b/gcc/except.c
@@ -1037,14 +1037,6 @@ add_partial_entry (handler)
 {
   expand_eh_region_start ();
 
-  /* ??? This comment was old before the most recent rewrite.  We
-     really ought to fix the callers at some point.  */
-  /* For backwards compatibility, we allow callers to omit calls to
-     begin_protect_partials for the outermost region.  So, we must
-     explicitly do so here.  */
-  if (!cfun->eh->protect_list)
-    begin_protect_partials ();
-
   /* Add this entry to the front of the list.  */
   TREE_VALUE (cfun->eh->protect_list)
     = tree_cons (NULL_TREE, handler, TREE_VALUE (cfun->eh->protect_list));
@@ -1057,14 +1049,6 @@ end_protect_partials ()
 {
   tree t;
 
-  /* ??? This comment was old before the most recent rewrite.  We
-     really ought to fix the callers at some point.  */
-  /* For backwards compatibility, we allow callers to omit the call to
-     begin_protect_partials for the outermost region.  So,
-     PROTECT_LIST may be NULL.  */
-  if (!cfun->eh->protect_list)
-    return;
-
   /* Pop the topmost entry.  */
   t = TREE_VALUE (cfun->eh->protect_list);
   cfun->eh->protect_list = TREE_CHAIN (cfun->eh->protect_list);