!7

sS transpilerID = /*#1025804;*/ #759;

p {

  S sRuns = second(args);

  int runs = 12; // 8 wasn't enough to fully compile for smaller sources

  if (isInteger(sRuns)) runs = parseInt(sRuns);

  bool mediumTranspile = !cic(args, "quick");

  S snippetID = or2(first(args), #1016478); // transpile the OS by default

  S mainJava =

    //[[print("hello!");]];

    //loadSnippet(#759); // doesn't work, requires different transpiler

    loadSnippet(snippetID);

  mainJava = dropTranslators(mainJava);

  S transpiled, transpiled2;

  new L<Long> times;

  bool resultsDiffer;

  maximizeConsole();

  O transpiler = hotwireDependent(transpilerID);

  setAll(transpiler,

    /*useIndexedList2 := false, useTokenIndexedList := true,*/

    dontLoadCachedIncludesFromVM := true,

    //cacheStdFunctions := false,

    //cacheStdClasses := false

  );

  time "First run" {

    set(transpiler, +mainJava);

    setOpt(transpiler, mainSnippetID := snippetID);

    callMain(transpiler);

    transpiled = (S) get(transpiler, 'mainJava);

  }

  long time1 = lastTiming();

  // Now we should have cached all the snippets, but not the pre-transpiled stuff.

  for (int run = 2; run <= runs; run++) {

    S msg = "Run " + run;

    if (run == runs) poorMansProfiling();

    if (run == runs-1) call(transpiler, "clearSnippetCache");

    time msg {

      if (mediumTranspile)

        call(transpiler, 'forgetCachedIncludes);

      set(transpiler, +mainJava);

      setOpt(transpiler, mainSnippetID := snippetID);

      callMain(transpiler);

      transpiled2 = (S) get(transpiler, 'mainJava);

    }

    times.add(lastTiming());

    S check1 = minusLinesContaining("myTranspilationDate_value", transpiled);

    S check2 = minusLinesContaining("myTranspilationDate_value", transpiled2);

    if (neq(check1, check2)) {

      set resultsDiffer;

      print("WARNING: RESULTS DIFFER");

      print(unidiff(check1, check2));

    }

  }

  poorMansProfiling_stopAndPrintResults();

  print("Made " + nChars(transpiled) + ", md5: " + md5(transpiled));

  print("Run 1 with downloads: " + time1 + " ms");

  int run = 2;

  for (long time : times) {

    print("Run " + run + " " + (run == runs-1 ? "with" : "w/o") + " downloads: " + time + " ms");

    run++;

  }

  if (resultsDiffer)

    print("WARNING: RESULTS DIFFER BETWEEN RUNS");

}