From 4847522fd4030af7ddb92b789545bc4e253524ee Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Mon, 21 Oct 2019 11:04:18 +0200 Subject: [PATCH] some clean-up --- src/comp.c | 11 ----------- 1 file changed, 11 deletions(-) diff --git a/src/comp.c b/src/comp.c index f71df794185..a7a5ce0dcbe 100644 --- a/src/comp.c +++ b/src/comp.c @@ -37,13 +37,6 @@ along with GNU Emacs. If not, see . */ #define COMP_DEBUG 1 -/* - If 1 always favorite the emission of direct constants when these are know - instead of the corresponding frame slot access. - This has to prove to have some perf advantage but certainly makes the - generated code C-like code more bloated. -*/ - /* C symbols emited for the load relocation mechanism. */ #define DATA_RELOC_SYM "d_reloc" #define IMPORTED_FUNC_RELOC_SYM "f_reloc" @@ -60,10 +53,6 @@ along with GNU Emacs. If not, see . */ XCAR (XCDR (x)) #define THIRD(x) \ XCAR (XCDR (XCDR (x))) -#define FORTH(x) \ - XCAR (XCDR (XCDR (XCDR (x)))) -#define FIFTH(x) \ - XCAR (XCDR (XCDR (XCDR (XCDR (x))))) #define FUNCALL1(fun, arg) \ CALLN (Ffuncall, intern_c_string (STR(fun)), arg) -- 2.39.5