diff --git a/src/ChangeLog b/src/ChangeLog
index f3a765f5661..e92e1dad809 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2000-01-26  Gerd Moellmann  <gerd@gnu.org>
+
+	* bytecode.c (Fbyte_code) [BYTE_CODE_SAFE]: Fix typo.
+
 2000-01-25  Gerd Moellmann  <gerd@gnu.org>
 
 	* charset.c (Fstring): If there is a multibyte char among
diff --git a/src/bytecode.c b/src/bytecode.c
index d103d2f1177..084dfef6fb5 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -433,7 +433,7 @@ If the third argument is incorrect, Emacs may crash.")
   while (1)
     {
 #ifdef BYTE_CODE_SAFE
-      if (top > stacks)
+      if (top > stacke)
 	error ("Byte code stack overflow (byte compiler bug), pc %d, depth %d",
 	       stack.pc - stack.byte_string_start, stacke - top);
       else if (top < stack.bottom - 1)