summaryrefslogtreecommitdiff
path: root/utils/ccomp.ml
diff options
context:
space:
mode:
Diffstat (limited to 'utils/ccomp.ml')
-rw-r--r--utils/ccomp.ml4
1 files changed, 4 insertions, 0 deletions
diff --git a/utils/ccomp.ml b/utils/ccomp.ml
index c44bb64c3f..ec90acecfc 100644
--- a/utils/ccomp.ml
+++ b/utils/ccomp.ml
@@ -46,6 +46,10 @@ let quote_files lst =
then build_diversion lst
else s
+let quote_optfile = function
+ | None -> ""
+ | Some f -> Filename.quote f
+
let compile_file name =
command
(Printf.sprintf