diff options
Diffstat (limited to 'src/as.scm')
-rw-r--r-- | src/as.scm | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/src/as.scm b/src/as.scm deleted file mode 100644 index d309b8a..0000000 --- a/src/as.scm +++ /dev/null @@ -1,16 +0,0 @@ -(define-module (src as) - #:export (as) - #:declarative? #f) - -(define (call-in-module thunk module) - (let* ((curmod (current-module)) - (_ (set-current-module (resolve-module module))) - (v (thunk)) - (_ (set-current-module curmod))) - v)) - -(define (load-in-module path module-name) - (call-in-module (lambda () (load path)) module-name)) - -(define (as what file) - (load-in-module file `(src as ,what))) |