return alists; refactor structure

1 files changed, 18 insertions, 0 deletions

diff --git a/srfi/225/core.sld b/srfi/225/core.sld
new file mode 100644
index 0000000..573464d
--- /dev/null
+++ b/srfi/225/core.sld
@@ -0,0 +1,18 @@
+(define-library
+  (srfi 225 core)
+
+  (import (scheme base)
+          (scheme case-lambda)
+          (srfi 1)
+          (srfi 128)
+          (srfi 225 indexes))
+  (cond-expand
+    ((library (srfi 145)) (import (srfi 145)))
+    (else (include "assumptions.scm")))
+
+  (include "core-impl.scm")
+  (include-library-declarations "core-exports.scm")
+  (export make-dto-private
+          make-modified-dto
+          procvec
+          dict-procedures-count))