summaryrefslogtreecommitdiff
path: root/scheme
diff options
context:
space:
mode:
authormicheles <micheles@micheles-mac>2010-03-28 17:42:39 +0200
committermicheles <micheles@micheles-mac>2010-03-28 17:42:39 +0200
commitecf277c15bda9e6284c2fff02ae5917e7ce159f2 (patch)
tree455e08c6c7d29712573e9d9dfde19ed633ad391e /scheme
parentaa7077b22aa020b53264ad1bca0f8ba82b25348d (diff)
downloadmicheles-ecf277c15bda9e6284c2fff02ae5917e7ce159f2.tar.gz
Recovered my repository
Diffstat (limited to 'scheme')
-rw-r--r--scheme/experimental/registry.sls17
-rw-r--r--scheme/sweet-macros/main.mzscheme.sls9
2 files changed, 0 insertions, 26 deletions
diff --git a/scheme/experimental/registry.sls b/scheme/experimental/registry.sls
index c2a0226..e69de29 100644
--- a/scheme/experimental/registry.sls
+++ b/scheme/experimental/registry.sls
@@ -1,17 +0,0 @@
-#!r6rs
-(library (experimental registry)
-(export registry register)
-(import (rnrs))
-
-(define _registry '())
-
-(define (registry)
- _registry)
-
-(define (register id)
- (display "registering ") (display id) (newline)
- (set! _registry (append _registry (list id)))
- _registry)
-
-(display "registry instantiated\n")
-)
diff --git a/scheme/sweet-macros/main.mzscheme.sls b/scheme/sweet-macros/main.mzscheme.sls
index 1c6bd88..e69de29 100644
--- a/scheme/sweet-macros/main.mzscheme.sls
+++ b/scheme/sweet-macros/main.mzscheme.sls
@@ -1,9 +0,0 @@
-#!r6rs
-(library (sweet-macros)
-(export syntax-match def-syntax syntax-expand)
-(import (rnrs) (for (sweet-macros helper3) run expand))
-
-;; this only works for macros defined through def-syntax
-(def-syntax (syntax-expand (macro . args))
- #'(syntax->datum ((macro <transformer>) #'(... (... (macro . args))))))
-)