1
2
3
4
5
6
7
8
9
10
11
12
13
include struct
[@@@warning "-33"]
open Result_compat
open Pervasives [@@warning "-3"]
type ('a, 'error) t = ('a, 'error) result =
| Ok of 'a
| Error of 'error
end
type ('a, 'error) result = ('a, 'error) t =
| Ok of 'a
| Error of 'error