2018-03-15 Steven G. Kargl <kargl@gcc.gnu.org>
[official-gcc.git] / gcc / testsuite / gnat.dg / boolean_subtype2.ads
blob82e192b1dc44e25ac001c8f399b7f597295254c3
1 with Boolean_Subtype2_Pkg; use Boolean_Subtype2_Pkg;
3 package Boolean_Subtype2 is
5 subtype B is Boolean;
7 function Is_String_Type (Id : Entity_Id) return B;
9 end Boolean_Subtype2;