diff options
| author | herbelin | 2008-05-10 16:35:46 +0000 |
|---|---|---|
| committer | herbelin | 2008-05-10 16:35:46 +0000 |
| commit | ae3a6c63018d5743c16ab388d3e1f9bfde0eb43d (patch) | |
| tree | c9d46bdf330f267430e679094c1a0e65051a378c /toplevel | |
| parent | 7df139ca0834b0b93e6259eaecb05c0b8c5cbe99 (diff) | |
Correction bug #1842 + correction bug initialisation introduit dans
commit 10916
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10917 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/coqtop.ml | 1 | ||||
| -rw-r--r-- | toplevel/vernacentries.ml | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index b9ca8bc8a3..a4dee4b6ed 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -305,6 +305,7 @@ let parse_args is_ide = let init is_ide = Sys.catch_break false; (* Ctrl-C is fatal during the initialisation *) + Lib.init(); begin try parse_args is_ide; diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index 78d3598ef2..e9b49e7e81 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -95,7 +95,7 @@ let show_script () = let pts = get_pftreestate () in let pf = proof_of_pftreestate pts and evc = evc_of_pftreestate pts in - msgnl_with Pp_control.deep_ft (print_treescript true evc pf) + msgnl_with !Pp_control.deep_ft (print_treescript true evc pf) let show_thesis () = msgnl (anomaly "TODO" ) |