# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1093196606 0
# Node ID 349245fdad22e285972ae9735c133cd452f14855
# Parent  560751ade8e5fcefc78ca9e071eaa908b4ea94dd
(Fbyte_code) <unwind-protect>: Cannot GC.

diff -r 560751ade8e5 -r 349245fdad22 src/bytecode.c
--- a/src/bytecode.c	Sun Aug 22 17:41:15 2004 +0000
+++ b/src/bytecode.c	Sun Aug 22 17:43:26 2004 +0000
@@ -855,10 +855,7 @@
 	  }
 
 	case Bunwind_protect:
-	  /* The function record_unwind_protect can GC.  */
-	  BEFORE_POTENTIAL_GC ();
 	  record_unwind_protect (Fprogn, POP);
-	  AFTER_POTENTIAL_GC ();
 	  break;
 
 	case Bcondition_case: