runtime: copy more of scheduler from Go 1.7 runtime
[official-gcc.git] / gcc / testsuite / gnat.dg / pack15.adb
blob019b2da0f7873f1c4e0d00d2d2badde3cc0f7b4b
1 -- { dg-do compile }
3 package body Pack15 is
5 procedure Transfer is
6 begin
7 O.Status_Flags := Status_Flags;
8 end;
10 end Pack15;