fix: compat issue

This commit is contained in:
Simon Cruanes 2019-12-14 17:26:08 -06:00
parent 7d9d9d45b8
commit ab494fb753
2 changed files with 8 additions and 0 deletions

View file

@ -10,6 +10,10 @@ type 'a printer = Format.formatter -> 'a -> unit
(** {2 Basics} *) (** {2 Basics} *)
type nonrec (+'good, +'bad) result = ('good, 'bad) result =
| Ok of 'good
| Error of 'bad
type (+'good, +'bad) t = ('good, 'bad) result = type (+'good, +'bad) t = ('good, 'bad) result =
| Ok of 'good | Ok of 'good
| Error of 'bad | Error of 'bad

View file

@ -21,6 +21,10 @@ type 'a printer = Format.formatter -> 'a -> unit
(** {2 Basics} *) (** {2 Basics} *)
type nonrec (+'good, +'bad) result = ('good, 'bad) result =
| Ok of 'good
| Error of 'bad
type (+'good, +'bad) t = ('good, 'bad) result = type (+'good, +'bad) t = ('good, 'bad) result =
| Ok of 'good | Ok of 'good
| Error of 'bad | Error of 'bad