OSDN Git Service

* gcc-interface/decl.c (make_type_from_size) <INTEGER_TYPE>: Just copy
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / thin_pointer2_pkg.ads
1 package Thin_Pointer2_Pkg is
2
3    type SA is access String;
4    for SA'Size use Standard'Address_Size;
5    S : SA;
6
7    function F return Character;
8
9 end Thin_Pointer2_Pkg;