INTERFACE AnimRequestQueuePrivate;

IMPORT AnimHandle, Prop;

FROM AnimRequestQueue IMPORT T, Public;

REVEAL
  T <: Private;

TYPE
  Private = Public OBJECT
    list : List;
    ah   : AnimHandle.T;
  END;

TYPE
  List = REF RECORD
    req  : Prop.Request;
    next : List;
  END;

END AnimRequestQueuePrivate.