1-- { dg-do compile } 2-- { dg-options "-O" } 3 4package body Opt11 is 5 6 procedure Proc is 7 R : Rec; 8 begin 9 R := (others => <>); 10 end; 11 12end Opt11; 13