git.annexia.org
/
virt-df.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
7291c7cbc214ea9c4472136d8529c87b33d29254
[virt-df.git]
/
test_int63.ml
1
open Printf
2
open Int63.Operators
3
4
let () =
5
let a = ~^3 *^ ~^500 in
6
let b = a <^< 3 in
7
printf "result = %s\n" (Int63.to_string b)