>From ba211b61d2c9e60935415f57b15511477132bccb Mon Sep 17 00:00:00 2001 From: Alexander Gramiak Date: Fri, 19 Apr 2019 08:29:39 -0600 Subject: [PATCH] * src/bytecode.c (exec_byte_code) Unroll Blist3 and Blist4 --- src/bytecode.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/bytecode.c b/src/bytecode.c index 40977799bf..b38c21a464 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.21.0