INTERFACE ClassDir;

IMPORT Node;

TYPE
  T <: Tx;  Tx = Node.Named_T OBJECT
    kind: Node.Class := Node.Class.Unknown;
  END;

PROCEDURE Init ();

END ClassDir.