X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=myocamlbuild.ml;h=3e14dfaae827d57b25a326ba8bb49aedd40bbfeb;hb=8418336ce6ce7cc0970332438de9af1114ff1089;hp=bbe7fc091ef0def00d4c9f7ce59281b449c06f4e;hpb=813b239795aac1844eb233dab7f8f98d8dba845e;p=SXSI%2Fxpathcomp.git

diff --git a/myocamlbuild.ml b/myocamlbuild.ml
index bbe7fc0..3e14dfa 100644
--- a/myocamlbuild.ml
+++ b/myocamlbuild.ml
@@ -106,8 +106,8 @@ let () = dispatch begin
       Options.ocamldoc := ocamlfind (A"ocamldoc");
       Options.ocamlmktop := ocamlfind (A"ocamlmktop");
 
-      if (List.mem "trace" !Options.tags) then begin
-	pp_macro_options @= [ A "-DTRACE" ];
+      if not (List.mem "trace" !Options.tags) then begin
+	pp_macro_options @= [ A "-DNTRACE" ];
       end;
       if (List.mem "profile" !Options.tags) then begin
 	pp_macro_options @= [ A "-DPROFILE" ];