summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/specs/size_attribute1_pkg2.adb
blob: ded1c8c659e111ee0a6855c3aa6b415901871a15 (plain)
1
2
3
4
5
6
7
8
9
package body Size_Attribute1_Pkg2 is

  procedure Proc is
    I : Integer := T'Size;
  begin
    null;
  end;

end Size_Attribute1_Pkg2;