Class.Extendstype ('M, 'T) t = 'M * ('M, 'T) t'and ('M, 'T) t' = {expr : ('M, 'T) Expression.t;targs : ('M, 'T) Type.TypeArgs.t option;comments : ('M, unit) Syntax.t option;}val 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 ->
stringval pp_t' :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
Format.formatter ->
('M, 'T) t' ->
unitval show_t' :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
('M, 'T) t' ->
string