From ea99f8e24538750da22bbcaac24c788979c5d5ef Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 9 Jun 2015 22:57:25 -0400 Subject: [PATCH] More stubs --- scheme/cyclone/libraries.sld | 18 +++++++++++++++++- 1 file changed, 17 insertions(+), 1 deletion(-) diff --git a/scheme/cyclone/libraries.sld b/scheme/cyclone/libraries.sld index e2011793..64a74a57 100644 --- a/scheme/cyclone/libraries.sld +++ b/scheme/cyclone/libraries.sld @@ -1,9 +1,25 @@ (define-library (scheme cyclone libraries) (import (scheme base) - ; TODO: what else? + ; TODO: what else? definitely need trans.scm ) (export ;; TODO: get these from library scm file +;(define (library? ast) +;(define (lib:name ast) (cadr ast)) +;(define (lib:name->string name) +;(define (lib:name->symbol name) +;(define (lib:result result) +;(define (lib:exports ast) +;(define (lib:imports ast) +;(define (lib:body ast) +;(define (lib:includes ast) +;(define (lib:import->filename import . ext) +;(define (lib:import->path import) +;(define (lib:read-imports import) +;(define (lib:import->export-list import) +;(define (lib:resolve-imports imports) +;(define (lib:get-all-import-deps imports) +;(define (lib:get-dep-list libs/deps) ) (include "../../libraries.scm") ;(begin