summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/volatile5_pkg.ads
blob: 71a0c8046a3272ddea8d18f7f2e732ecdb720a1b (plain)
1
2
3
4
5
6
7
8
9
10
11
package Volatile5_Pkg is

   type Rec is record
      I : Integer;
   end record;
   pragma Volatile(Rec);

  function F return Rec;

end Volatile5_Pkg;
--