Source file stdlib0.ml

1
2
3
4
5
6
7
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