From 807b21dc40ebdb855e61b4ee6ddf0b227d91b728 Mon Sep 17 00:00:00 2001 From: Alexander Gramiak Date: Sun, 23 Jun 2019 19:35:26 +0200 Subject: [PATCH] src/bytecode.c (exec_byte_code) Unroll Blist3 and Blist4 * src/bytecode.c (exec_byte_code): Unroll Blist3 and Blist4 (bug#35321). --- src/bytecode.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/bytecode.c b/src/bytecode.c index 6f601cf0cd5..29dff44f007 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -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): -- 2.39.5