X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=build;h=e45b732526fa674ffe46f2b60550bf09a47734a0;hb=HEAD;hp=13546376d5a4d426d8bda6d36117d3d4eb3ff942;hpb=ddd48898c9d77270a46fa16b66bb8b291e0859d0;p=SXSI%2Fxpathcomp.git

diff --git a/build b/build
index 1354637..e45b732 100755
--- a/build
+++ b/build
@@ -14,16 +14,16 @@ module Cmdline =
     let verbose = ref ""
     let jobs = ref 0
     let specs = align
-      [ "-verbose", Unit (set verbose "-verbose 10 -classic-display"),
+      [ "-verbose", Unit (set verbose " -classic-display"),
 	" Display compilation commands";
 
-	"-debug", Unit (cons tags "-tag debug"),
+	"-enable-debug", Unit (cons tags "-tag debug"),
 	" Build with debugging code";
 
-	"-profile", Unit (cons tags "-tag profile"),
+	"-enable-profile", Unit (cons tags "-tag profile"),
 	" Build with profiling code";
 
-	"-trace", Unit (cons tags "-tag trace"),
+	"-enable-log", Unit (cons tags "-tag log"),
 	" Build with tracing code enabled";
 
 	"-byte", Unit (set flavor "byte"),
@@ -56,7 +56,7 @@ let tests_targets = []
 let () = Cmdline.parse ()
 let cmd_list =
   let ocamlbuild =
-    Printf.sprintf "ocamlbuild  %s %s -j %i "
+    Printf.sprintf "ocamlbuild %s %s -j %i "
       !Cmdline.verbose (String.concat " " !Cmdline.tags) !Cmdline.jobs
   in
   List.map begin function