language-readers receive environment as an arg

[bpt/guile.git] / module / language / ecmascript / spec.scm

diff --git a/module/language/ecmascript/spec.scm b/module/language/ecmascript/spec.scm
index 7a1ea46..dd4dc3c 100644 (file)
--- a/module/language/ecmascript/spec.scm
+++ b/module/language/ecmascript/spec.scm
@@ -31,7 +31,7 @@
 (define-language ecmascript
   #:title      "Guile ECMAScript"
   #:version    "3.0"
-  #:reader     (lambda () (read-ecmascript/1 (current-input-port)))
+  #:reader     (lambda (port env) (read-ecmascript/1 port))
   #:compilers   `((tree-il . ,compile-tree-il))
   ;; a pretty-printer would be interesting.
   #:printer    write