Source

mutated_ocaml / testsuite / tests / lib-dynlink-native / a.ml

Full commit
1
2
3
4
5
let x = ref 0
let u = Random.int 1000

let () =
  Printf.printf "A is running (%i)\n%!" u