!7

p-experiment {
  testOptEval("vmPort()", vmPort());
  testOptEval([[reversedString("abc")]], reversedString("abc"));
  testOptEval([[reversedString("abc");]], reversedString("abc"));
  testOptEval([[#123]], #123);
  testEval("1+2", 3);
  print("\nAll OK");
}

svoid testOptEval(S code, O expectedResult) {
  if (testEval(code, expectedResult))
    quickFail("Shouldn't bail");
}

static bool testEval(S code, O expectedResult) {
  print(code);
  long time = sysNow();
  int bails = optimizedJavaEval_bails!;
  O result = optimizedJavaEval(code);
  bool bailed = bails < optimizedJavaEval_bails!;
  printIndent("[" + (elapsedMS(time) + " ms" + (bailed ? ", bailed" : "") + "] " + sfu(result));
  assertEquals(expectedResult, result);
  ret bailed;
}