diff --git a/bin/main.ml b/bin/main.ml
index fb9480c3..dd48d6f0 100644
--- a/bin/main.ml
+++ b/bin/main.ml
@@ -29,6 +29,9 @@ module Arg = struct
   end
 
   let path = Path.conv
+
+  [@@@ocaml.warning "-32"]
+  let file = path
 end
 
 type common =