From 9b0512158dafc3a9e9275dc335ac0e63e776ecc4 Mon Sep 17 00:00:00 2001
From: barras
Date: Mon, 17 Sep 2001 14:11:13 +0000
Subject: quotation des noms de fichiers pour eviter une mauvaise
 interpretation des \

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

(limited to 'scripts')

diff --git a/scripts/coqc.ml b/scripts/coqc.ml
index 981a3431fb..f458e8dcff 100644
--- a/scripts/coqc.ml
+++ b/scripts/coqc.ml
@@ -91,8 +91,9 @@ let compile command args file =
   let oc = open_out tmpfile in
   Printf.fprintf oc "Module %s.\n" modulename;
   Printf.fprintf oc "Load %s\"%s\".\n" 
-    (if !verbose then "Verbose " else "") file;
-  Printf.fprintf oc "Write Module %s \"%s\".\n" modulename filevo;
+    (if !verbose then "Verbose " else "") (String.escaped file);
+  Printf.fprintf oc "Write Module %s \"%s\".\n" modulename
+    (String.escaped filevo);
   flush oc;
   close_out oc;
   try
-- 
cgit v1.2.3