From cf512e32687b41690ab436f13322d7a9e00094b7 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Tue, 31 Mar 2015 12:21:47 +0200 Subject: [PATCH] 32-way branching in intmap.scm, not 16-way * module/language/cps/intmap.scm (*branch-bits*): Switch to 32-way branching. Marginally faster on lookup, and creation costs can be amortized via using the transient interface. Marginal speedup for assembler.scm compilation. --- module/language/cps/intmap.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/module/language/cps/intmap.scm b/module/language/cps/intmap.scm index 467a63d6b..948d0baba 100644 --- a/module/language/cps/intmap.scm +++ b/module/language/cps/intmap.scm @@ -49,7 +49,7 @@ (define-syntax-rule (define-inline name val) (define-syntax name (identifier-syntax val))) -(define-inline *branch-bits* 4) +(define-inline *branch-bits* 5) (define-inline *branch-size* (ash 1 *branch-bits*)) (define-inline *branch-mask* (1- *branch-size*)) -- 2.20.1