INTERFACE DBRd;

TYPE
  T <: T_; T_ = OBJECT
  METHODS
    init (path: TEXT): T;
    get_int (): INTEGER;
    get_line (): TEXT;
    close ();
  END;

END DBRd.