MatchPattern.AsPatterntype ('M, 'T) target = | Identifier of ('M, 'T) Identifier.t| Binding of 'M * ('M, 'T) BindingPattern.tand ('M, 'T) t = {pattern : ('M, 'T) MatchPattern.t;target : ('M, 'T) target;comments : ('M, unit) Syntax.t option;}val pp_target :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
Format.formatter ->
('M, 'T) target ->
unitval show_target :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
('M, 'T) target ->
stringval pp :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
Format.formatter ->
('M, 'T) t ->
unitval show :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
('M, 'T) t ->
string