diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-06-21 15:35:40 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-06-21 16:21:19 +0200 |
| commit | 3758cf9887172ecccb5d2e18e301c6ff1bb1c9f5 (patch) | |
| tree | 6fb7c632ef54ce4a17eaaa766f6a84f0f0deb76c /lib/control.ml | |
| parent | 14ae5f4534ee5e632d82990e7db76305b9ca9b75 (diff) | |
Less ocaml warnings.
Diffstat (limited to 'lib/control.ml')
| -rw-r--r-- | lib/control.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/control.ml b/lib/control.ml index 40ffa17b1..67d5a9b4e 100644 --- a/lib/control.ml +++ b/lib/control.ml @@ -60,7 +60,7 @@ let windows_timeout n f e = done in let init = Unix.time () in - let id = Thread.create thread init in + let _id = Thread.create thread init in try let res = f () in let () = killed := true in |