stupid ocaml.
authorPierre Habouzit <madcoder@debian.org>
Wed, 28 Nov 2007 14:07:10 +0000 (15:07 +0100)
committerPierre Habouzit <madcoder@debian.org>
Wed, 28 Nov 2007 14:07:10 +0000 (15:07 +0100)
tools/cpkg2c.mll

index b04a849..388973a 100644 (file)
@@ -627,7 +627,7 @@ int luaopen_%s(lua_State *L)
   let warn ob = output_endline ob "/*** THIS FILE IS AUTOGENERATED !!! ***/"
 
   let process fn file l =
-    try Unix.unlink file with _ -> ();
+    (try Unix.unlink file with _ -> ());
     let ob = open_out_gen  [ Open_trunc ; Open_wronly; Open_creat ] 0o444 file in
     warn ob; fn ob l; close_out ob