Module Object.Property

type ('M, 'T) key =
  1. | Literal of 'T * 'M Literal.t
  2. | Identifier of ('M, 'T) Identifier.t
  3. | PrivateName of 'M PrivateName.t
  4. | Computed of ('M, 'T) ComputedKey.t
and ('M, 'T) t = 'M * ('M, 'T) t'
and ('M, 'T) t' =
  1. | Init of {
    1. key : ('M, 'T) key;
    2. value : ('M, 'T) Expression.t;
    3. shorthand : bool;
    }
  2. | Method of {
    1. key : ('M, 'T) key;
    2. value : 'M * ('M, 'T) Function.t;
    }
  3. | Get of {
    1. key : ('M, 'T) key;
    2. value : 'M * ('M, 'T) Function.t;
    3. comments : ('M, unit) Syntax.t option;
    }
  4. | Set of {
    1. key : ('M, 'T) key;
    2. value : 'M * ('M, 'T) Function.t;
    3. comments : ('M, unit) Syntax.t option;
    }