forked from pool/virt-v2v
3d46099cfd
* New virt-v2v-inspector(1) tool. This tool can be used before conversion to collect facts about the source guest, such as number of disks, and to estimate the disk space required after conversion. * Add support for NVMe devices and SATA hard disks when importing from VMware VMX files (Laszlo Ersek). * Add support for importing to KubeVirt using the new experimental -o kubevirt mode. * Windows 11 guests are now supported. * Rocky Linux guest support has been added (Andrey Drobyshev). * The -o json mode was removed. It was intended to be used with KubeVirt but was never actually used there. Use -o kubevirt instead. * Numerous bug fixes and build changes OBS-URL: https://build.opensuse.org/package/show/Virtualization/virt-v2v?expand=0&rev=36
58 lines
1.9 KiB
Diff
58 lines
1.9 KiB
Diff
SLE15-SP5 uses ocamlc version 4.05 where the Pervasives module is
|
|
used and it has no Stdlib module.
|
|
In ocamlc version 4.07 and newer, Pervasives is deprecated
|
|
and Stdlib should be used.
|
|
|
|
Index: virt-v2v-2.2.0/lib/create_ovf.ml
|
|
===================================================================
|
|
--- virt-v2v-2.2.0.orig/lib/create_ovf.ml
|
|
+++ virt-v2v-2.2.0/lib/create_ovf.ml
|
|
@@ -787,7 +787,7 @@ let rec create_ovf source inspect
|
|
|
|
if verbose () then (
|
|
eprintf "OVF:\n";
|
|
- doc_to_chan Stdlib.stderr ovf
|
|
+ doc_to_chan Pervasives.stderr ovf
|
|
);
|
|
|
|
(* Return the OVF document. *)
|
|
Index: virt-v2v-2.2.0/output/output_disk.ml
|
|
===================================================================
|
|
--- virt-v2v-2.2.0.orig/output/output_disk.ml
|
|
+++ virt-v2v-2.2.0/output/output_disk.ml
|
|
@@ -122,7 +122,7 @@ module Disk = struct
|
|
|
|
if verbose () then (
|
|
eprintf "resulting local libvirt XML:\n";
|
|
- DOM.doc_to_chan Stdlib.stderr doc;
|
|
+ DOM.doc_to_chan Pervasives.stderr doc;
|
|
eprintf "\n%!";
|
|
)
|
|
|
|
Index: virt-v2v-2.2.0/output/output_libvirt.ml
|
|
===================================================================
|
|
--- virt-v2v-2.2.0.orig/output/output_libvirt.ml
|
|
+++ virt-v2v-2.2.0/output/output_libvirt.ml
|
|
@@ -184,7 +184,7 @@ module Libvirt_ = struct
|
|
|
|
if verbose () then (
|
|
eprintf "resulting XML for libvirt:\n%!";
|
|
- DOM.doc_to_chan Stdlib.stderr doc;
|
|
+ DOM.doc_to_chan Pervasives.stderr doc;
|
|
eprintf "\n%!";
|
|
);
|
|
|
|
Index: virt-v2v-2.2.0/convert/convert.ml
|
|
===================================================================
|
|
--- virt-v2v-2.2.0.orig/convert/convert.ml
|
|
+++ virt-v2v-2.2.0/convert/convert.ml
|
|
@@ -131,7 +131,7 @@ and get_mpstats g =
|
|
if verbose () then (
|
|
(* This is useful for debugging speed / fstrim issues. *)
|
|
eprintf "mpstats:\n";
|
|
- List.iter (print_mpstat Stdlib.stderr) mpstats
|
|
+ List.iter (print_mpstat Pervasives.stderr) mpstats
|
|
);
|
|
|
|
mpstats
|