Expression.Membertype ('M, 'T) property = | PropertyIdentifier of ('M, 'T) Identifier.t| PropertyPrivateName of 'M PrivateName.t| PropertyExpression of ('M, 'T) Expression.tand ('M, 'T) t = {_object : ('M, 'T) Expression.t;property : ('M, 'T) property;comments : ('M, unit) Syntax.t option;}val pp_property :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
Format.formatter ->
('M, 'T) property ->
unitval show_property :
(Format.formatter -> 'M -> unit) ->
(Format.formatter -> 'T -> unit) ->
('M, 'T) property ->
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