Source file `ordered_collection_common.ml`

1
2
3
4
5
6
7
open! Import
include Ordered_collection_common0

let get_pos_len ?pos ?len () ~total_length =
  try Result.Ok (get_pos_len_exn () ?pos ?len ~total_length) with
  | Invalid_argument s -> Error (Error.of_string s)
;;