2 -- { dg-options "-fdump-tree-gimple" }
6 Null_Constant
: constant Rec
:= (Data
=> (others => 0),
7 Padding
=> (others => 0));
10 Instance
:= Null_Constant
;
13 procedure Init_Volatile
is
15 Instance_Volatile
:= Null_Constant
;
20 -- { dg-final { scan-tree-dump-times "= {}" 2 "gimple"} }