From 732df3a136a83adc170eea88b7c1cd41cc10998b Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Mon, 20 Apr 2015 00:11:44 +0900 Subject: [PATCH] Trying to load libraries for scribble doc examples. --- lib/chibi/snow/commands.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/chibi/snow/commands.scm b/lib/chibi/snow/commands.scm index b5a91672..6e142bd9 100644 --- a/lib/chibi/snow/commands.scm +++ b/lib/chibi/snow/commands.scm @@ -331,7 +331,9 @@ (lib-name (library-name (car lib+files))) (exports (cond ((assq 'export (cdar lib+files)) => cdr) (else '()))) (mod (guard (exn (else #f)) - #f)) + (begin + (load path (environment '(meta))) + (load-module lib-name)))) (defs (map (lambda (x) (let ((val (and mod (module-ref mod x)))) `(,x ,val ,(object-source val))))