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

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

package Thin_Pointer2_Pkg is

   type SA is access String;
   for SA'Size use Standard'Address_Size;
   S : SA;

   function F return Character;

end Thin_Pointer2_Pkg;