From 84b3747b2d28fbd94f68ddb05328674f592cb82f Mon Sep 17 00:00:00 2001
From: herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>
Date: Thu, 29 Jun 2000 21:33:43 +0000
Subject: Capture erreur de create_process

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@536 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 scripts/coqc.ml4 | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'scripts')

diff --git a/scripts/coqc.ml4 b/scripts/coqc.ml4
index 7e70db6b4..5500903a9 100644
--- a/scripts/coqc.ml4
+++ b/scripts/coqc.ml4
@@ -88,6 +88,9 @@ let compile command args file =
     if not !keep then Sys.remove tmpfile ;
     match status with
       | _, Unix.WEXITED 0 -> ()
+      | _, Unix.WEXITED 127 -> 
+	  Printf.printf "Cannot execute %s\n" command;
+	  exit 1
       | _, Unix.WEXITED c -> exit c
       | _                 -> exit 1
   with _ -> 
-- 
cgit v1.2.3