Apply suggestion

raphael-proust · raphael-proust · commit 0db9599a8079 · 2023-07-28T11:23:51.000+02:00
diff --git a/src/unix/lwt_main.ml b/src/unix/lwt_main.ml
@@ -17,7 +17,7 @@ open Lwt.Infix
 let enter_iter_hooks = Lwt_sequence.create ()
 let leave_iter_hooks = Lwt_sequence.create ()
 
-let yield () = Lwt.pause ()
+let yield = Lwt.pause
 
 let abandon_yielded_and_paused () =
   Lwt.abandon_paused ()
