diff options
Diffstat (limited to 'src/bytecode.c')
| -rw-r--r-- | src/bytecode.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index 4475d4a0b30..1da2ecba071 100644 --- a/src/bytecode.c +++ b/src/bytecode.c | |||
| @@ -697,10 +697,7 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template, | |||
| 697 | { | 697 | { |
| 698 | Lisp_Object sym = vectorp[op]; | 698 | Lisp_Object sym = vectorp[op]; |
| 699 | Lisp_Object val = POP; | 699 | Lisp_Object val = POP; |
| 700 | 700 | if (XBARE_SYMBOL (sym)->u.s.redirect == SYMBOL_PLAINVAL | |
| 701 | /* Inline the most common case. */ | ||
| 702 | if (!BASE_EQ (val, Qunbound) | ||
| 703 | && XBARE_SYMBOL (sym)->u.s.redirect == SYMBOL_PLAINVAL | ||
| 704 | && !XBARE_SYMBOL (sym)->u.s.trapped_write) | 701 | && !XBARE_SYMBOL (sym)->u.s.trapped_write) |
| 705 | SET_SYMBOL_VAL (XBARE_SYMBOL (sym), val); | 702 | SET_SYMBOL_VAL (XBARE_SYMBOL (sym), val); |
| 706 | else | 703 | else |