prefixednotation.ads

来自「Ada 2005 Training Notes.」· ADS 代码 · 共 9 行

package PrefixedNotation is
   type T is tagged
      record
         I: Integer;
      end record;

   procedure P(X: in out T);
end PrefixedNotation;