Require target lra in gcc.dg/pr108095.c
[official-gcc.git] / gcc / testsuite / gnat.dg / derived_type6.ads
blob37728a92a0e582934794ccd502a251139db40914
1 with Ada.Strings.Bounded;
3 package Derived_Type6 is
4 package b is new Ada.Strings.Bounded.Generic_Bounded_Length(10);
5 subtype s1 is b.Bounded_String;
6 type s2 is new s1;
8 procedure Foo;
9 end Derived_Type6;