11 lines
212 B
OCaml
11 lines
212 B
OCaml
|
open Swig
|
||
|
|
open Sizet
|
||
|
|
|
||
|
|
let _ =
|
||
|
|
let s = C_int64 2000L in
|
||
|
|
assert (_test1 '(s) as int = 2000);
|
||
|
|
assert (_test2 '(s) as int = 2000);
|
||
|
|
assert (_test3 '(s) as int = 2000);
|
||
|
|
assert (_test4 '(s) as int = 2000);
|
||
|
|
;;
|