Object.Property
type ('M, 'T) key =
| StringLiteral of 'M * 'M StringLiteral.t
| NumberLiteral of 'M * 'M NumberLiteral.t
| BigIntLiteral of 'M * 'M BigIntLiteral.t
| Identifier of ('M, 'T) Identifier.t
| Computed of ('M, 'T) ComputedKey.t
and ('M, 'T) t = 'M * ('M, 'T) t'
and ('M, 'T) t' = {
key : ('M, 'T) key;
pattern : ('M, 'T) Pattern.t;
default : ('M, 'T) Expression.t option;
shorthand : bool;
}