Source file `stdlib0.ml`

1
2
3
4
5
6
7
8
9
10
module Int = struct
  let to_string = string_of_int
end

module Option = struct
  let map f o =
    match o with
    | None -> None
    | Some v -> Some (f v)
end