X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Ftoplevel.lisp;h=497d4a032058918439a21b7962469505402a71b4;hb=be500b83eef452b448bfb9225e12846908ac8fc9;hp=a3965548895c3a190d15fbd63b5e568014fb3da7;hpb=75633282e9f9f4b0b1c74bdcf27f693988e079fc;p=jscl.git

diff --git a/src/toplevel.lisp b/src/toplevel.lisp
index a396554..497d4a0 100644
--- a/src/toplevel.lisp
+++ b/src/toplevel.lisp
@@ -249,6 +249,8 @@
 
 (setq *package* *user-package*)
 
+(defvar *root* (%js-vref "window"))
+
 ;;; Set some external entry point to the Lisp implementation to the
 ;;; console. It would not be necessary when FFI is finished.
 (let ((*root* #j:lisp))