tamdt.ads

来自「用于进行gcc测试」· ADS 代码 · 共 11 行

package TAMDT is
   procedure Check;
private
   type TAMT1;
   type TAMT1_Access is access TAMT1;

   type TAMT2;
   type TAMT2_Access is access TAMT2;
end;