let _ = Bisect.Runtime.init "expr_polyrec.ml"
let rec f : 'a . 'a -> unit =
  fun _ ->
    (Bisect.Runtime.mark "expr_polyrec.ml" 1; f 0);
    Bisect.Runtime.mark "expr_polyrec.ml" 0;
    f ""
let () =
  Bisect.Runtime.mark "expr_polyrec.ml" 5;
  (let rec f : 'a . 'a -> unit =
     fun _ ->
       (Bisect.Runtime.mark "expr_polyrec.ml" 3; f 0);
       Bisect.Runtime.mark "expr_polyrec.ml" 2;
       f "" in
   Bisect.Runtime.mark "expr_polyrec.ml" 4; f 0)
