From d9c1f6f955607281bea9f5168390a39c04d50043 Mon Sep 17 00:00:00 2001
From: Dave Love <fx@gnu.org>
Date: Tue, 30 Jan 2001 10:07:18 +0000
Subject: [PATCH] (Fbyte_code) <Bgeq>: Add BEFORE_POTENTIAL_GC and
 AFTER_POTENTIAL_GC.

---
 src/ChangeLog  | 5 +++++
 src/bytecode.c | 2 ++
 2 files changed, 7 insertions(+)

diff --git a/src/ChangeLog b/src/ChangeLog
index fa023f9e69f..706ff7979b1 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2001-01-30  Dave Love  <fx@gnu.org>
+
+	* bytecode.c (Fbyte_code) <Bgeq>: Add BEFORE_POTENTIAL_GC and
+	AFTER_POTENTIAL_GC.
+
 2001-01-29  Gerd Moellmann  <gerd@gnu.org>
 
 	* bytecode.c (Fbyte_code) <Bcurrent_column>: Add
diff --git a/src/bytecode.c b/src/bytecode.c
index 7cd38a0fe2e..f2394556e2b 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1193,8 +1193,10 @@ If the third argument is incorrect, Emacs may crash.")
 	case Bgeq:
 	  {
 	    Lisp_Object v1;
+	    BEFORE_POTENTIAL_GC ();
 	    v1 = POP;
 	    TOP = Fgeq (TOP, v1);
+	    AFTER_POTENTIAL_GC ();
 	    break;
 	  }
 
-- 
2.39.5