mock_csv/test/test_random_int.ml
2024-12-11 08:33:41 +01:00

8 lines
120 B
OCaml

open Ast
let () =
let s = random_int 7 77 in
let i = int_of_string s in
assert( i <= 77 );
assert( i >= 7 );