From f2c8f8287fbc975eee1413f39709af8b43d358c2 Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Tue, 5 Aug 2025 10:27:31 +0200 Subject: Disable interrupts Doesn't do that much, but it's a good idea for slsets as well because it makes it unlikely that plist changes are ever observed, because there's no thread switching. --- benchmarks/benchmark.scm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'benchmarks/benchmark.scm') diff --git a/benchmarks/benchmark.scm b/benchmarks/benchmark.scm index 541f5db..6ef4044 100644 --- a/benchmarks/benchmark.scm +++ b/benchmarks/benchmark.scm @@ -9,6 +9,8 @@ ;; value which makes hashing fast. Slsets don't care about the symbol ;; size and don't need a preallocated size. +(declare (disable-interrupts)) + (import (chicken fixnum) (chicken string) (chicken process-context) (only srfi-1 lset-difference) srfi-69 slsets) (unless (= (length (command-line-arguments)) 2) -- cgit v1.2.3