diff --git a/src/core/CCInt32.ml b/src/core/CCInt32.ml index 42cbdf5c..a08b23fc 100644 --- a/src/core/CCInt32.ml +++ b/src/core/CCInt32.ml @@ -110,7 +110,6 @@ let random_range i j st = add i (random (sub j i) st) let of_string_exn = of_string let of_string x = try Some (of_string_exn x) with Failure _ -> None -let of_string_opt = of_string let most_significant_bit = logxor (neg 1l) (shift_right_logical (neg 1l) 1) type output = char -> unit diff --git a/src/core/CCInt32.mli b/src/core/CCInt32.mli index 218168d7..39431a33 100644 --- a/src/core/CCInt32.mli +++ b/src/core/CCInt32.mli @@ -81,9 +81,6 @@ val of_string : string -> t option (** [of_string s] is the safe version of {!of_string_exn}. Like {!of_string_exn}, but return [None] instead of raising. *) -val of_string_opt : string -> t option -(** [of_string_opt s] is an alias to {!of_string}. *) - val of_string_exn : string -> t (** [of_string_exn s] converts the given string [s] into a 32-bit integer. Alias to {!Int32.of_string}.