trying to make a test that works on all systems

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13678 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
2013-05-15 14:08:08 +00:00 · 2013-05-15 14:08:08 +00:00 · aac1147965
parent 1f06400ce4
commit aac1147965
1 changed files with 1 additions and 1 deletions
--- a/testsuite/tests/lib-threads/close.ml
+++ b/testsuite/tests/lib-threads/close.ml
@ -16,7 +16,7 @@ let main () =
    (fun () ->
      Thread.delay 1.0;
      print_endline "closing fd...";
-      Unix.close rd;
+      Unix.close wr;
    )
    () in
  let buf = String.create 10 in