src/bytecode.c (exec_byte_code) Unroll Blist3 and Blist4
* src/bytecode.c (exec_byte_code): Unroll Blist3 and Blist4 (bug#35321).
This commit is contained in:
parent
d8ebb997c1
commit
807b21dc40
1 changed files with 2 additions and 2 deletions
|
@ -884,12 +884,12 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth,
|
|||
|
||||
CASE (Blist3):
|
||||
DISCARD (2);
|
||||
TOP = Flist (3, &TOP);
|
||||
TOP = list3 (TOP, top[1], top[2]);
|
||||
NEXT;
|
||||
|
||||
CASE (Blist4):
|
||||
DISCARD (3);
|
||||
TOP = Flist (4, &TOP);
|
||||
TOP = list4 (TOP, top[1], top[2], top[3]);
|
||||
NEXT;
|
||||
|
||||
CASE (BlistN):
|
||||
|
|
Loading…
Add table
Reference in a new issue