diff options
| author | Peter Bex <peter@more-magic.net> | 2025-08-19 10:17:33 +0200 |
|---|---|---|
| committer | Peter Bex <peter@more-magic.net> | 2025-08-19 10:17:33 +0200 |
| commit | 1007f7aef69d3fe28942ad74cc002b49bd1eefaa (patch) | |
| tree | a373209aee9e1ebb533711a1db66110befc40e55 | |
| parent | 66eb53e611256a163a0ff4623b889a8382948305 (diff) | |
| download | slset-1007f7aef69d3fe28942ad74cc002b49bd1eefaa.tar.gz | |
Use singular "slset" instead of plural "slsets"
| -rw-r--r-- | benchmarks/benchmark.scm | 4 | ||||
| -rw-r--r-- | slset.egg (renamed from slsets.egg) | 2 | ||||
| -rw-r--r-- | slset.scm (renamed from slsets.scm) | 2 | ||||
| -rw-r--r-- | tests/run.scm | 4 |
4 files changed, 6 insertions, 6 deletions
diff --git a/benchmarks/benchmark.scm b/benchmarks/benchmark.scm index 927fe15..1bd1f74 100644 --- a/benchmarks/benchmark.scm +++ b/benchmarks/benchmark.scm @@ -2,7 +2,7 @@ ;; Simple benchmarking program to compare set-difference on hash ;; tables, lsets and slsets. ;; -;; Note that the tests for slsets is severely disadvantaged because +;; Note that the tests for slset is severely disadvantaged because ;; the hash tables are created with the size of the set, which ;; normally would not be the case because you can't predict ahead of ;; time how big it would get. Also, the symbols have a short string @@ -11,7 +11,7 @@ (declare (disable-interrupts)) -(import (chicken fixnum) (chicken string) (chicken process-context) (chicken time) (only srfi-1 lset-difference) srfi-69 slsets) +(import (chicken fixnum) (chicken string) (chicken process-context) (chicken time) (only srfi-1 lset-difference) srfi-69 slset) (unless (= (length (command-line-arguments)) 2) (error "Need impl name (one of lset, slset, (cached-)symbolset, (cached-)hash-table or (cached-)srfi-69) and set size (number or 'loop')")) @@ -5,4 +5,4 @@ (category data) (license "BSD") (test-dependencies test) - (components (extension slsets (csc-options "-O3")))) + (components (extension slset (csc-options "-O3")))) @@ -8,7 +8,7 @@ ;; (declare (disable-interrupts)) -(module slsets +(module slset (slset<= slset= slset-adjoin slset-difference slset-intersection slset-difference+intersection diff --git a/tests/run.scm b/tests/run.scm index f9a47ea..1c209c2 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -1,5 +1,5 @@ -;; (load "../slsets.scm") -(import slsets test (chicken plist)) +;; (load "../slset.scm") +(import slset test (chicken plist)) (define all-symbols '(a b c d e i o u x y z)) (define all-plist-entries (apply append (map symbol-plist all-symbols))) |