{$%+}
unit dummy;

   interface

      procedure %_unit;
      procedure %_class;
      procedure %_pgm;
      procedure %_super;
      procedure %_csubck;

   implementation

      procedure %_unit;
         begin end;

      procedure %_class;
         begin end;

      procedure %_pgm;
         begin end;

      procedure %_super;
         begin end;

      procedure %_csubck;
         begin end;
end.

