runtime: copy more of scheduler from Go 1.7 runtime
[official-gcc.git] / gcc / testsuite / gnat.dg / pak.ads
blobe1e2d0d4d63c9be46d7b3123733dd806bc0dc9aa
1 with Ada.Finalization;
2 package Pak is
3 type T is new Ada.Finalization.Controlled with null record;
4 procedure Initialize (X : in out T);
5 procedure Finalize (X : in out T);
6 procedure Assign (X : out T'Class);
7 end Pak;