ソースを参照

[cpp] time native compilation

Simon Krajewski 10 年 前
コミット
f511cb2f6d
1 ファイル変更2 行追加0 行削除
  1. 2 0
      gencpp.ml

+ 2 - 0
gencpp.ml

@@ -5761,6 +5761,7 @@ let generate_source common_ctx =
       | _ -> cmd_defines := !cmd_defines ^ " -D" ^ name ^ "=\"" ^ (escape_command value) ^ "\"" ) common_ctx.defines;
    write_build_options common_ctx (common_ctx.file ^ "/Options.txt") common_ctx.defines;
    if ( not (Common.defined common_ctx Define.NoCompilation) ) then begin
+      let t = Common.timer "generate cpp - native compilation" in
       let old_dir = Sys.getcwd() in
       Sys.chdir common_ctx.file;
       let cmd = ref "haxelib run hxcpp Build.xml haxe" in
@@ -5770,6 +5771,7 @@ let generate_source common_ctx =
       print_endline !cmd;
       if common_ctx.run_command !cmd <> 0 then failwith "Build failed";
       Sys.chdir old_dir;
+      t()
    end
    ;;