fix chicken build, support STKLOS

1 files changed, 5 insertions, 5 deletions

diff --git a/lib/cuprate.sld b/lib/cuprate.sld
index 4123074..91df5ff 100644
--- a/lib/cuprate.sld
+++ b/lib/cuprate.sld
@@ -54,11 +54,11 @@
                    (newline)))))
   ;; Better containers for the test info than alists, if available.
   (cond-expand
-    (chicken (import (srfi 128) (srfi 146 hash))
-             (begin
-               (define default-test-dto hash-mapping-dto)
-               (define (alist->default-dictionary x)
-                 (alist->hashmap (make-default-comparator) x))))
+    ((or chicken skint) (import (srfi 128) (srfi 146 hash))
+        (begin
+          (define default-test-dto hash-mapping-dto)
+          (define (alist->default-dictionary x)
+            (alist->hashmap (make-default-comparator) x))))
     (else (begin
             (define default-test-dto eqv-alist-dto)
             (define (alist->default-dictionary x) x))))