Flow_ast.Matchmodule Case : sig ... endtype ('M, 'T, 'B) t = {arg : ('M, 'T) Expression.t;cases : ('M, 'T, 'B) Case.t list;match_keyword_loc : 'M;comments : ('M, unit) Syntax.t option;}val pp :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
(Format.formatter -> 'B -> unit) ->
Format.formatter ->
('M, 'T, 'B) t ->
unitval show :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
(Format.formatter -> 'B -> unit) ->
('M, 'T, 'B) t ->
string