missing extension of Format

This commit is contained in:
Simon Cruanes 2018-01-02 23:39:55 +01:00
parent 18c9f88411
commit 858ef0e90f
2 changed files with 4 additions and 0 deletions

View file

@ -5,6 +5,8 @@
type 'a sequence = ('a -> unit) -> unit type 'a sequence = ('a -> unit) -> unit
include Format
type t = Format.formatter type t = Format.formatter
type 'a printer = t -> 'a -> unit type 'a printer = t -> 'a -> unit

View file

@ -7,6 +7,8 @@
type 'a sequence = ('a -> unit) -> unit type 'a sequence = ('a -> unit) -> unit
include module type of Format
type t = Format.formatter type t = Format.formatter
type 'a printer = t -> 'a -> unit type 'a printer = t -> 'a -> unit