On Tuesday 10 March 2015 18:31:41 Richard W.M. Jones wrote:
 +    (* Boot the guest. *)
 +    let conn = C.connect () in
 +    let dom = D.create_xml conn boot_xml [D.START_AUTODESTROY] in 
When using ocaml-libvirt 0.6.1.2 (as shipped in f21), this results in:
  File "v2v_test_harness.ml", line 174, characters 14-26:
  Error: Unbound value D.create_xml
Indeed, the ocaml-libvirt in that version has no Domain.create_xml,
nor Domain flags like START_AUTODESTROY.
-- 
Pino Toscano