aboutsummaryrefslogtreecommitdiff
path: root/tests/BoxedInt.ml
diff options
context:
space:
mode:
authorGrégoire Duchêne <gduchene@awhk.org>2014-09-28 21:46:13 +0200
committerGrégoire Duchêne <gduchene@awhk.org>2014-09-28 23:03:16 +0200
commit187dcd089f8a86e8d8e769769496f791d69ec09d (patch)
tree072837702a85236fbe85e88452fcf6390b2a2c82 /tests/BoxedInt.ml
parent19ee8bf4e7226117c47edfba623db61720a07338 (diff)
Added the first tests
Diffstat (limited to 'tests/BoxedInt.ml')
-rw-r--r--tests/BoxedInt.ml7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/BoxedInt.ml b/tests/BoxedInt.ml
new file mode 100644
index 0000000..ad8db7c
--- /dev/null
+++ b/tests/BoxedInt.ml
@@ -0,0 +1,7 @@
+let x = Int32.of_int 1
+let y = Int64.of_int 1
+let z = Int64.to_int32 y |> Int32.add x |> Nativeint.of_int32
+
+let a = Int32.to_int x
+let b = Int64.to_int y
+let c = Nativeint.to_int z