diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1998-10-20 12:58:23 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1998-10-20 12:58:23 +0000 |
| commit | 44f468cd12417c153342dbcac498ada11355886f (patch) | |
| tree | 8501a924a635637f840d2fcc2104eae08edb9dc1 | |
| parent | d37dc11baa6e7cf7fb1a3f873d9bca5af1105618 (diff) | |
Mettre Sys.interactive a true avant de charger le code utilisateur linke avec ocamlmktop
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2132 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | toplevel/toploop.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/toploop.ml b/toplevel/toploop.ml index 260b7fa77..0453ca7fb 100644 --- a/toplevel/toploop.ml +++ b/toplevel/toploop.ml @@ -266,6 +266,7 @@ let empty_lexbuf lb = can call directives from Topdirs. *) let _ = + Sys.interactive := true; Symtable.init_toplevel(); Clflags.thread_safe := true; Compile.init_path() @@ -275,7 +276,6 @@ let _ = exception PPerror let loop() = - Sys.interactive := true; print_string " Objective Caml version "; print_string Config.version; print_newline(); print_newline(); |