MinaProtocol / mina / 584

coverage: 14.436% (-19.8%) from 34.248%
584

push

buildkite

web-flow 
Merge pull request #17778 from MinaProtocol/dkijania/publish_mina_logproc

[CI] Publish logproc in nightly

9561 of 66228 relevant lines covered (14.44%)

279.58 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

16.67
/src/lib/o1trace/execution_timer.ml
1 
open Core_kernel
36✔
2 









3



module T =










4



  Plugins.Register_plugin










5



    (struct










6



      type state = Time_ns.Span.t ref [@@deriving sexp_of]




×







7












8



      let name = "Execution_timer"










9












10



      let init_state _thread_name = ref Time_ns.Span.zero




×







11



    end)










12



    ()










13












14



include T










15












16



let rec record_elapsed_time (fiber : Thread.Fiber.t) elapsed_time =










17



  let state = Plugins.plugin_state (module T) fiber.thread in




×







18



  (state := Time_ns.Span.(!state + elapsed_time)) ;




×







19



  match fiber.parent with










20



  | None ->




×







21



      ()










22



  | Some parent ->




×







23



      record_elapsed_time parent elapsed_time










24












25



let on_job_enter _fiber = ()




×







26












27



let on_job_exit fiber elapsed_time = record_elapsed_time fiber elapsed_time




×







28












29



let on_new_fiber _fiber = ()




×







30












31



let on_cycle_end () = ()




77,523✔





32












33



let elapsed_time_of_thread thread = !(Plugins.plugin_state (module T) thread)




×





















    

  • 

    •