diff options
Diffstat (limited to 'src/bytecode.c')
| -rw-r--r-- | src/bytecode.c | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index 639c543dbf9..464bc3d12de 100644 --- a/src/bytecode.c +++ b/src/bytecode.c | |||
| @@ -51,7 +51,7 @@ by Hallvard: | |||
| 51 | * | 51 | * |
| 52 | * define BYTE_CODE_METER to enable generation of a byte-op usage histogram. | 52 | * define BYTE_CODE_METER to enable generation of a byte-op usage histogram. |
| 53 | */ | 53 | */ |
| 54 | /* #define BYTE_CODE_SAFE 1 */ | 54 | /* #define BYTE_CODE_SAFE */ |
| 55 | /* #define BYTE_CODE_METER */ | 55 | /* #define BYTE_CODE_METER */ |
| 56 | 56 | ||
| 57 | 57 | ||
| @@ -1720,8 +1720,13 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth, | |||
| 1720 | break; | 1720 | break; |
| 1721 | #endif | 1721 | #endif |
| 1722 | 1722 | ||
| 1723 | case 0: | ||
| 1724 | /* Actually this is Bstack_ref with offset 0, but we use Bdup | ||
| 1725 | for that instead. */ | ||
| 1726 | /* case Bstack_ref: */ | ||
| 1727 | abort (); | ||
| 1728 | |||
| 1723 | /* Handy byte-codes for lexical binding. */ | 1729 | /* Handy byte-codes for lexical binding. */ |
| 1724 | /* case Bstack_ref: */ /* Use `dup' instead. */ | ||
| 1725 | case Bstack_ref+1: | 1730 | case Bstack_ref+1: |
| 1726 | case Bstack_ref+2: | 1731 | case Bstack_ref+2: |
| 1727 | case Bstack_ref+3: | 1732 | case Bstack_ref+3: |