open V2v_test_harness

let test = "win_xpsp3_i386_no_tools"
let input_disk = test ^ ".ova"

let test_plan = {
  default_plan with
    (*
      This would work, but unfortunately Windows dialogs don't open
      in exactly the same place on the screen, defeating our simple
      screen-matching algorithm:

      boot_plan = Boot_to_screenshot (test ^ ".ppm");
    *)
    boot_plan = No_boot;
}

let () = run ~test ~input_disk ~test_plan ()