* tree-ssa-pre.c (create_component_ref_by_pieces_1) <ARRAY_REF>: Drop

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / layered_abstraction_p.ads

generic 
    type T is private;
    Obj : T;
package Layered_Abstraction_P is
   Obj2 : T := Obj; 
end;