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;}