WIP

scheme/cyclone/libraries.sld

@@ -1,25 +1,25 @@
 (define-library (scheme cyclone libraries)
   (import (scheme base)
+          (scheme read)
           ; TODO: what else? definitely need trans.scm
   )
   (export
-    ;; TODO: get these from library scm file
+    library?
-;(define (library? ast)
+    lib:name
-;(define (lib:name ast) (cadr ast))
+    lib:name->string
-;(define (lib:name->string name)
+    lib:name->symbol
-;(define (lib:name->symbol name)
+    lib:result
-;(define (lib:result result)
+    lib:exports
-;(define (lib:exports ast)
+    lib:imports
-;(define (lib:imports ast)
+    lib:body
-;(define (lib:body ast)
+    lib:includes
-;(define (lib:includes ast)
+    lib:import->filename
-;(define (lib:import->filename import . ext)
+    lib:import->path
-;(define (lib:import->path import)
+    lib:read-imports
-;(define (lib:read-imports import)
+    lib:import->export-list
-;(define (lib:import->export-list import)
+    lib:resolve-imports
-;(define (lib:resolve-imports imports)
+    lib:get-all-import-deps
-;(define (lib:get-all-import-deps imports)
+    lib:get-dep-list
-;(define (lib:get-dep-list libs/deps)
   )
   (include "../../libraries.scm")
   ;(begin