From: Paul Eggert <eggert@cs.ucla.edu>
Date: Thu, 17 Mar 2011 02:18:00 +0000 (-0700)
Subject: * bytecode.c (CONSTANTLIM): Remove; unused.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~554^2~4
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=615f2d59a5ee849bc46c3fa57d41fd136f2d0962;p=emacs.git

* bytecode.c (CONSTANTLIM): Remove; unused.

(METER_CODE, Bscan_buffer, Bread_char, Bset_mark):
Define only if needed.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 9dcab33fed5..fa08263a80a 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,6 +1,9 @@
 2011-03-17  Paul Eggert  <eggert@cs.ucla.edu>
 
 	* bytecode.c (MAYBE_GC): Rewrite so as not to use empty "else".
+	(CONSTANTLIM): Remove; unused.
+	(METER_CODE, Bscan_buffer, Bread_char, Bset_mark):
+	Define only if needed.
 
 	* unexelf.c (unexec): Name an expression,
 	to avoid gcc -Wbad-function-cast warning.
diff --git a/src/bytecode.c b/src/bytecode.c
index fca8a8e1ebe..ce2f06dfccb 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -76,11 +76,7 @@ Lisp_Object Qbyte_code_meter;
     }									\
 }
 
-#else /* no BYTE_CODE_METER */
-
-#define METER_CODE(last_code, this_code)
-
-#endif /* no BYTE_CODE_METER */
+#endif /* BYTE_CODE_METER */
 
 
 Lisp_Object Qbytecode;
@@ -146,7 +142,9 @@ Lisp_Object Qbytecode;
 #define Bpreceding_char 0150
 #define Bcurrent_column 0151
 #define Bindent_to 0152
+#ifdef BYTE_CODE_SAFE
 #define Bscan_buffer 0153 /* No longer generated as of v18 */
+#endif
 #define Beolp 0154
 #define Beobp 0155
 #define Bbolp 0156
@@ -154,8 +152,12 @@ Lisp_Object Qbytecode;
 #define Bcurrent_buffer 0160
 #define Bset_buffer 0161
 #define Bsave_current_buffer_1 0162 /* Replacing Bsave_current_buffer.  */
+#if 0
 #define Bread_char 0162 /* No longer generated as of v19 */
+#endif
+#ifdef BYTE_CODE_SAFE
 #define Bset_mark 0163 /* this loser is no longer generated as of v18 */
+#endif
 #define Binteractive_p 0164 /* Needed since interactive-p takes unevalled args */
 
 #define Bforward_char 0165
@@ -227,7 +229,6 @@ Lisp_Object Qbytecode;
 #define BinsertN 0261
 
 #define Bconstant 0300
-#define CONSTANTLIM 0100
 
 /* Whether to maintain a `top' and `bottom' field in the stack frame.  */
 #define BYTE_MAINTAIN_TOP (BYTE_CODE_SAFE || BYTE_MARK_STACK)