summaryrefslogtreecommitdiff
path: root/scheme/mit/geiser/compile.scm
diff options
context:
space:
mode:
authorPeter <craven@gmx.net>2016-04-26 07:19:36 +0200
committerPeter <craven@gmx.net>2016-04-26 07:19:36 +0200
commitfe2c79adce933b29e4bfcc6ca6f5c5e5546095a5 (patch)
treecd8ed8493a6f7c053d74f0a0cd37e813951df797 /scheme/mit/geiser/compile.scm
parentdcaf849ccdfd488fb26e0d9131bbc59928690e0d (diff)
downloadgeiser-guile-fe2c79adce933b29e4bfcc6ca6f5c5e5546095a5.tar.gz
geiser-guile-fe2c79adce933b29e4bfcc6ca6f5c5e5546095a5.tar.bz2
Add preliminary support for MIT/GNU Scheme.
Diffstat (limited to 'scheme/mit/geiser/compile.scm')
-rw-r--r--scheme/mit/geiser/compile.scm9
1 files changed, 9 insertions, 0 deletions
diff --git a/scheme/mit/geiser/compile.scm b/scheme/mit/geiser/compile.scm
new file mode 100644
index 0000000..5817aa2
--- /dev/null
+++ b/scheme/mit/geiser/compile.scm
@@ -0,0 +1,9 @@
+(declare (usual-integrations))
+
+(load-option 'CREF)
+
+(with-working-directory-pathname
+ (directory-pathname (current-load-pathname))
+ (lambda ()
+ (cf "emacs")
+ (cref/generate-constructors "geiser" 'ALL)))