add subtyping back

1 files changed, 6 insertions, 8 deletions

diff --git a/lib/SAHP/internal.sld b/lib/SAHP/internal.sld
index 4a40096..5d66a67 100644
--- a/lib/SAHP/internal.sld
+++ b/lib/SAHP/internal.sld
@@ -16,20 +16,18 @@
 
 (define-library (SAHP internal)
   (import (scheme base)
-          (chicken base)
-          (srfi 1) (srfi 69) (srfi 111) (srfi 128) (srfi 146))
+          (srfi 1) (srfi 26) (srfi 69) (srfi 128) (srfi 146 hash))
   (export make-new-SAHP extract-SAHP-descriptor
+          SAHP-global-scope
           SAHP-dynamic-scope-parameter
           SAHP-local-scope
           SAHP=?
           SAHP-implementation-not-found-error?
-          %SAHP-set/subtypes
-          %SAHP-add-to-global
-          %SAHP/local-scope
-          all-exact-integers all-exact-rationals
-          all-reals all-complex all-numbers)
+          %SAHP-set
+          %SAHP/local-scope)
   (cond-expand
-    (chicken (import (chicken memory representation))
+    (chicken (import (chicken base)
+                     (chicken memory representation))
              (include "internal-chicken.scm"))
     (else (include "internal-portable.scm")))
   (include "internal-common.scm"))