From dbb74d813720f348dca930a6a434abe17f6f42c6 Mon Sep 17 00:00:00 2001 From: Keisuke Nishida Date: Tue, 22 Aug 2000 18:44:19 +0000 Subject: [PATCH] (compile-file): Output "(use-modules (vm vm))". --- vm/compile.scm | 1 + 1 file changed, 1 insertion(+) diff --git a/vm/compile.scm b/vm/compile.scm index 14d25a490..1510e90b5 100644 --- a/vm/compile.scm +++ b/vm/compile.scm @@ -52,6 +52,7 @@ (with-output-to-file out-file (lambda () (format #t ";;; Compiled from ~A\n\n" file) + (display "(use-modules (vm vm))\n\n") (display "(let ((vm (make-vm)))\n") (display " (define (vm-exec code)\n") (display " (vm-run vm (make-program (make-bytecode code) #f)))\n")