summaryrefslogtreecommitdiff
path: root/toplevel/toploop.ml
diff options
context:
space:
mode:
Diffstat (limited to 'toplevel/toploop.ml')
-rw-r--r--toplevel/toploop.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/toploop.ml b/toplevel/toploop.ml
index 2dbb56c17e..4322a5916a 100644
--- a/toplevel/toploop.ml
+++ b/toplevel/toploop.ml
@@ -179,7 +179,6 @@ let empty_lexbuf lb =
let _ =
Symtable.init_toplevel();
- toplevel_env := Compile.initial_env ();
Sys.interactive := true
(* The loop *)
@@ -188,6 +187,7 @@ let loop() =
print_string "\tCaml Special Light version ";
print_string Config.version;
print_newline(); print_newline();
+ toplevel_env := Compile.initial_env();
let lb = Lexing.from_function refill_lexbuf in
Location.input_name := "";
Location.input_lexbuf := Some lb;