Index: virt-v2v/common/mlstdutils/std_utils_tests.ml
===================================================================
--- virt-v2v.orig/common/mlstdutils/std_utils_tests.ml
+++ virt-v2v/common/mlstdutils/std_utils_tests.ml
@@ -152,9 +152,10 @@ let () =
   assert_equal_stringlist ["a"; "b"; "c"; "d"] (String.nsplit ~max:10 " " "a b c d");
 
   (* Test that nsplit can handle large strings. *)
-  let xs = Array.to_list (Array.make 10_000_000 "xyz") in
-  let xs_concat = String.concat " " xs in
-  assert_equal_stringlist xs (String.nsplit " " xs_concat)
+  if Sys.int_size >= 32 then
+    let xs = Array.to_list (Array.make 10_000_000 "xyz") in
+    let xs_concat = String.concat " " xs in
+    assert_equal_stringlist xs (String.nsplit " " xs_concat)
 
 (* Test Std_utils.String.lines_split. *)
 let () =