From 0d91eabb74f43aab550c3c1e0dfcc0f362381bc8 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Thu, 11 Feb 2016 23:41:18 -0500 Subject: [PATCH] Added define-library --- scheme/syntax-rules.sld | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/scheme/syntax-rules.sld b/scheme/syntax-rules.sld index 1ad21636..b3b9f322 100644 --- a/scheme/syntax-rules.sld +++ b/scheme/syntax-rules.sld @@ -1,4 +1,10 @@ ; A temporary file to test syntax-rules integration +(define-library (scheme syntax-rules) + (import (scheme base)) + (export + syntax-rules + ) + (begin ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; syntax-rules @@ -228,5 +234,6 @@ (list _error "no expansion for" (list (rename 'strip-syntactic-closures) _expr)) #f))))))))))) +))