path: root/testsuite/tests/lib-sync/trylock2.ml

(* TEST
*)

(* Test Mutex.try_lock *)

let () =
  let m = Mutex.create () in
  assert (Mutex.try_lock m);
  Mutex.unlock m;
  print_endline "passed"