SHA256
1
0
forked from pool/virt-v2v
virt-v2v/fix-compiler-error-Stdlib.stderr.patch
Charles Arnold 3d46099cfd - Update to virt-v2v 2.2.0
* 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
2023-02-08 23:24:59 +00:00

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