# core/interface/Object.tcl

    @interface Object <AutoRelease> {
      {
         refCount
      }

      + self ;
      + class ;
      + superclass ;

      + isKindOfClass: aClass ;
      + isMemberOfClass: aClass ;
      + forwardInvocation: aMessage ;
      + doesNotRecognize: aSelector ;
      + respondsTo: aSelector ;
      + conformsTo: aProtocol ;
      + error: aString ;

      + new ;
      + alloc ;

      - self ;
      - class ;
      - copy ;

      - forwardInvocation: aMessage ;
      - doesNotRecognize: aSelector ;
      - isKindOfClass: aClass ;
      - isMemberOfClass: aClass ;
      - conformsTo: aProtocol ;
      - respondsTo: aSelector ;
      - error: aString ;

      - init ;
      - dealloc ;

    }