#!/usr/bin/env ocaml let target = ref "main.otarget" let debug = ref false let profile = ref false let verbose = ref false let dir = Sys.getcwd () let project_root = Filename.dirname Sys.argv.(0) let () = Sys.chdir project_root let () = for i = 1 to Array.length Sys.argv - 1 do match Sys.argv.(i) with | "-d" -> debug := true | "-p" -> profile := true | "-v" -> verbose := true | x -> target := x done let oprofile = if !profile then " -tag profile " else "" let odebug = if !profile then " -tag debug " else "" let otarget = if !target = "clean" then " -clean " else !target let overbose = if !verbose then " -classic-display " else "" let cmd = "ocamlbuild -use-ocamlfind " ^ overbose ^ oprofile ^ odebug ^ otarget let i = Sys.command cmd let () = Sys.chdir dir let _ = exit i