Updated this file with new <^< operator, should probably delete it.

[virt-df.git] / lib / test_int63.ml

diff --git a/lib/test_int63.ml b/lib/test_int63.ml
index 6ce121b..7291c7c 100644 (file)
--- a/lib/test_int63.ml
+++ b/lib/test_int63.ml
@@ -3,5 +3,5 @@ open Int63.Operators
 
 let () =
   let a = ~^3 *^ ~^500 in
-  let b = a <<^ 3 in
+  let b = a <^< 3 in
   printf "result = %s\n" (Int63.to_string b)