X-Git-Url: http://git.hcoop.net/bpt/guile.git/blobdiff_plain/b73a2ee01773d910d82074a818c3955b45a6e6e1..f15c0f545be3dd4b1da92824b1bf782e3571b4a6:/module/ice-9/eval-string.scm

diff --git a/module/ice-9/eval-string.scm b/module/ice-9/eval-string.scm
index ae6792e67..789980938 100644
--- a/module/ice-9/eval-string.scm
+++ b/module/ice-9/eval-string.scm
@@ -22,7 +22,7 @@
   #:use-module (system base compile)
   #:use-module (system base language)
   #:use-module (system vm program)
-  #:use-module (system vm objcode)
+  #:use-module (system vm loader)
   #:replace (eval-string))
 
 (define (ensure-language x)
@@ -86,5 +86,5 @@
 
           (if (or compile? (not (language-evaluator lang)))
               ((load-thunk-from-memory
-                (read-and-compile port #:from lang #:to 'rtl)))
+                (read-and-compile port #:from lang #:to 'bytecode)))
               (read-and-eval port #:lang lang))))))))