From af88c8895bba85fe5340b34aafb3dce7650bd01f Mon Sep 17 00:00:00 2001
From: Sébastien Dailly <sebastien@chimrod.com>
Date: Fri, 1 Jan 2021 11:08:38 +0100
Subject: Use first type module instead of functors

---
 elements/timer.ml | 2 --
 1 file changed, 2 deletions(-)

(limited to 'elements')

diff --git a/elements/timer.ml b/elements/timer.ml
index 0a75e12..bd676fd 100755
--- a/elements/timer.ml
+++ b/elements/timer.ml
@@ -24,7 +24,6 @@ let start
     let {id; send; _} = t in
     t.counter <- Time.counter ();
 
-
     Brr.G.stop_timer id;
     let timer_id = Brr.G.set_interval
         ~ms:(int_of_float @@ d *. 1000.)
@@ -33,7 +32,6 @@ let start
            let span = Time.counter_value t.counter in
            t.counter <- Time.counter ();
            send span) in
-    ignore @@ Brr.G.set_timeout ~ms:0 (fun () ->  send 0.);
     t.id <- timer_id
 
 
-- 
cgit v1.2.3