added myocamlbuild and setup.ml back.

They have useful code.

Author: ivg

myocamlbuild.ml

@@ -0,0 +1,17 @@
+(* OASIS_START *)
+(* OASIS_STOP *)
+let oasis_env =
+  BaseEnvLight.load
+    ~filename:MyOCamlbuildBase.env_filename
+    ~allow_empty:true
+    ()
+let nonempty = function (A s) -> String.length s != 0 | _ -> true
+let expand s = BaseEnvLight.var_expand s oasis_env;;
+
+rule "piqic: piqi -> .ml & _ext.ml"
+  ~prods:["%_piqi.ml"; "%_piqi_ext.ml"]
+  ~deps:["%.piqi"]
+  (fun env _ ->
+     Cmd(S (List.filter nonempty [A (expand "${piqic}"); A (expand "${piqic_flags}"); A "-I"; A ".."; A (env "%.piqi"); A"--multi-format"])));;
+
+Ocamlbuild_plugin.dispatch dispatch_default;;

setup.ml

@@ -0,0 +1,22 @@
+(* OASIS_START *)
+(* OASIS_STOP *)
+
+let def_piqic (() : unit) : unit =
+  let chop str = try
+      Filename.chop_extension str
+    with _ -> str in
+  let piqic_path = BaseCheck.prog_best "piqic_path" ["piqic-ocaml"; "piqic"] () in
+  BaseEnv.var_define "piqic_flags" (fun () ->
+      if chop (Filename.basename (BaseEnv.var_get "piqic"))
+         = "piqic"
+      then "ocaml"
+      else "") |> ignore;
+  BaseEnv.var_define "piqic" (fun () ->
+      if (BaseStandardVar.os_type () = "Cygwin") || (BaseStandardVar.os_type () = "Win32")
+      then String.concat " "
+          (OASISExec.run_read_output ~ctxt:!BaseContext.default "cygpath" [piqic_path])
+      else piqic_path) |> ignore
+
+let () =
+  def_piqic ();
+  setup ();;