OSDN Git Service

* gcc-interface/trans.c (Identifier_to_gnu): Also handle deferred
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / import1.ads
1 package Import1 is\r
2 \r
3    type Arr is array (Positive range <>) of Integer;\r
4 \r
5    procedure Create (Bounds : Arr);\r
6 \r
7 end Import1;\r