gcc-4.9/gcc/testsuite/gnat.dg/specs/size_attribute1_pkg1.adb


1
2
3
4
5
6
7
8
9
10
11
12
13

package body Size_Attribute1_Pkg1 is

  type Rec is
    record
      F : T;
    end record;

  procedure Dummy is
  begin
    null;
  end;

end Size_Attribute1_Pkg1;