mirror of
https://github.com/ocaml-tracing/ocaml-opentelemetry.git
synced 2026-03-09 20:33:36 -04:00
remove dead code
This commit is contained in:
parent
85b6126b78
commit
8eda0730e9
1 changed files with 0 additions and 5 deletions
|
|
@ -67,11 +67,6 @@ let pop_if_ready ?(force = false) ~now (self : _ t) : _ list option =
|
||||||
(* Reverse the list to retrieve the FIFO order. *)
|
(* Reverse the list to retrieve the FIFO order. *)
|
||||||
Some (List.rev batch)
|
Some (List.rev batch)
|
||||||
|
|
||||||
(* Helper so we can count new elements and prepend them onto the existing [q] in
|
|
||||||
one pass. *)
|
|
||||||
let append_with_count ~(elems : 'a list) ~(q : 'a list) : int * 'a list =
|
|
||||||
elems |> List.fold_left (fun (count, q') x -> succ count, x :: q') (0, q)
|
|
||||||
|
|
||||||
let rec push_unprotected (self : _ t) ~(elems : _ list) : unit =
|
let rec push_unprotected (self : _ t) ~(elems : _ list) : unit =
|
||||||
match elems with
|
match elems with
|
||||||
| [] -> ()
|
| [] -> ()
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue