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;