[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 88889212c7 4/5: Remove debug code for opcodes long gone
From: |
Mattias Engdegård |
Subject: |
master 88889212c7 4/5: Remove debug code for opcodes long gone |
Date: |
Sat, 12 Mar 2022 11:38:55 -0500 (EST) |
branch: master
commit 88889212c7d74fb189131dcae4abaabd05eb1870
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>
Remove debug code for opcodes long gone
* src/bytecode.c (BYTE_CODES, enum byte_code_op, exec_byte_code):
Don't display custom messages in debug mode for Bscan_buffer and
Bset_mark which were removed long ago.
---
src/bytecode.c | 20 ++------------------
1 file changed, 2 insertions(+), 18 deletions(-)
diff --git a/src/bytecode.c b/src/bytecode.c
index c5cc659012..8d3817e64c 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -186,6 +186,7 @@ DEFINE (Bfollowing_char, 0147)
\
DEFINE (Bpreceding_char, 0150) \
DEFINE (Bcurrent_column, 0151) \
DEFINE (Bindent_to, 0152) \
+/* 0153 was Bscan_buffer in v17. */ \
DEFINE (Beolp, 0154) \
DEFINE (Beobp, 0155) \
DEFINE (Bbolp, 0156) \
@@ -193,6 +194,7 @@ DEFINE (Bbobp, 0157)
\
DEFINE (Bcurrent_buffer, 0160) \
DEFINE (Bset_buffer, 0161) \
DEFINE (Bsave_current_buffer_1, 0162) /* Replacing Bsave_current_buffer. */ \
+/* 0163 was Bset_mark in v17. */ \
DEFINE (Binteractive_p, 0164) /* Obsolete since Emacs-24.1. */
\
\
DEFINE (Bforward_char, 0165) \
@@ -277,11 +279,6 @@ enum byte_code_op
#define DEFINE(name, value) name = value,
BYTE_CODES
#undef DEFINE
-
-#if BYTE_CODE_SAFE
- Bscan_buffer = 0153, /* No longer generated as of v18. */
- Bset_mark = 0163, /* this loser is no longer generated as of v18 */
-#endif
};
/* Fetch the next byte from the bytecode stream. */
@@ -1467,19 +1464,6 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector,
Lisp_Object maxdepth,
TOP = INTEGERP (TOP) ? Qt : Qnil;
NEXT;
-#if BYTE_CODE_SAFE
- /* These are intentionally written using 'case' syntax,
- because they are incompatible with the threaded
- interpreter. */
-
- case Bset_mark:
- error ("set-mark is an obsolete bytecode");
- break;
- case Bscan_buffer:
- error ("scan-buffer is an obsolete bytecode");
- break;
-#endif
-
CASE_ABORT:
/* Actually this is Bstack_ref with offset 0, but we use Bdup
for that instead. */
- master updated (6ef9dc7797 -> 2c54e9a1dd), Mattias Engdegård, 2022/03/12
- master 2c54e9a1dd 5/5: Remove never-used relative jump opcodes, Mattias Engdegård, 2022/03/12
- master 2fb98486e1 3/5: Faster bytecode immediate argument fetching, Mattias Engdegård, 2022/03/12
- master fe65db05f4 2/5: Maintain end of specpdl instead of size, Mattias Engdegård, 2022/03/12
- master 213483124b 1/5: Inline record_in_backtrace, Mattias Engdegård, 2022/03/12
- master 88889212c7 4/5: Remove debug code for opcodes long gone,
Mattias Engdegård <=
- Re: master updated (6ef9dc7797 -> 2c54e9a1dd), Lars Ingebrigtsen, 2022/03/12