summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/deferred_const3_pkg.ads
blob: de6af3d52acb04b79977c6b1a0d6160e046276d6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
package Deferred_Const3_Pkg is

  C : constant Natural := 1;

  C1 : constant Natural := 1;
  for C1'Address use C'Address;

  C2 : constant Natural;
  for C2'Address use C'Address;

  C3 : constant Natural;

  procedure Dummy;

private
  C2 : constant Natural := 1;

  C3 : constant Natural := 1;
  for C3'Address use C'Address;

end Deferred_Const3_Pkg;