File fix-compiler-error-Stdlib.stderr.patch of Package virt-v2v

Overview Repositories Revisions Requests Users Attributes Meta

File fix-compiler-error-Stdlib.stderr.patch of Package virt-v2v (Revision dbb2176037ebba078f6e7f158e7a0970)

Currently displaying revision dbb2176037ebba078f6e7f158e7a0970 , Show latest

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

Places

File fix-compiler-error-Stdlib.stderr.patch of Package virt-v2v (Revision dbb2176037ebba078f6e7f158e7a0970)

Places