diff options
| author | ppedrot | 2012-05-23 15:21:17 +0000 |
|---|---|---|
| committer | ppedrot | 2012-05-23 15:21:17 +0000 |
| commit | c9f0c0f4725533ee2294d416be82ca45dda2cabb (patch) | |
| tree | 2ec02034a35c0d3855f177e48ed0e09efa073362 /ide/coq.ml | |
| parent | 8837c2365c382adb0a74bfedabb1659eeb472adc (diff) | |
Cleaned prerr_endline use.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15354 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/coq.ml')
| -rw-r--r-- | ide/coq.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ide/coq.ml b/ide/coq.ml index fae5cb7fcf..dd0959726c 100644 --- a/ide/coq.ml +++ b/ide/coq.ml @@ -293,11 +293,11 @@ let is_closed coqtop = coqtop.is_closed (** These are asynchronous signals *) let break_coqtop coqtop = try !interrupter coqtop.handle.pid - with _ -> prerr_endline "Error while sending Ctrl-C" + with _ -> Minilib.log "Error while sending Ctrl-C" let kill_coqtop coqtop = try !killer coqtop.handle.pid - with _ -> prerr_endline "Kill -9 failed. Process already terminated ?" + with _ -> Minilib.log "Kill -9 failed. Process already terminated ?" let unsafe_process coqtop f = coqtop.is_computing <- true; @@ -363,7 +363,7 @@ let eval_call coqtop (c:'a Serialize.call) = let msg = Printf.sprintf "Error communicating with pid [%i]: %s" coqtop.pid (Printexc.to_string err) in - prerr_endline msg; + Minilib.log msg; raise DeadCoqtop let interp coqtop ?(raw=false) ?(verbose=true) s = |