From a8954c1ac8f8afde14fe6e73e64021d8c53341f6 Mon Sep 17 00:00:00 2001
From: Anil Madhavapeddy <anil@recoil.org>
Date: Thu, 13 Jul 2017 22:25:57 +0100
Subject: [PATCH] tests: let the large integer literal overflow on 32-bit
 platforms

the alternative is it not compiling at all...
---
 lib_test/tests.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib_test/tests.ml b/lib_test/tests.ml
index 287cf5bb..44435bc1 100644
--- a/lib_test/tests.ml
+++ b/lib_test/tests.ml
@@ -123,7 +123,7 @@ let check_alignment_zero () =
     Invalid_argument _ -> ()
 
 let check_alignment_large () =
-  assert_equal (Cstruct.(check_alignment (create 1) 4294967296)) false
+  assert_equal (Cstruct.(check_alignment (create 1) (Int64.to_int 4294967296L))) false
 
 let _ =
   let suite =