Nottui_pretty: fix for OCaml 4.05

This commit is contained in:
Frédéric Bour 2020-06-06 23:01:40 +02:00
parent b2b8f40a8b
commit 75f4072ac8
1 ha cambiato i file con 2 aggiunte e 1 eliminazioni

Vedi File

@ -213,7 +213,8 @@ let mk_pad indent body suffix =
(* Flat renderer *)
let flat_cache (Cache slot) = match slot with
| (Flat_line _ | Flat_span _) as ui -> Some ui
| Flat_line _ as ui -> Some ui
| Flat_span _ as ui -> Some ui
| _ -> None
let rec pretty_flat = function