summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/lto8_pkg.adb
blob: de4c2a75797723dbef6b01d5e834d716a7fb47f4 (plain)
1
2
3
4
5
6
7
8
9
-- { dg-options "-gnatws" }

package body Lto8_Pkg is

   protected body Protected_Queue_T is
      entry Seize when True is begin null; end;
   end Protected_Queue_T;

end Lto8_Pkg;