Fix the new pr83361.c testcase
[official-gcc.git] / gcc / testsuite / gnat.dg / specs / discr1.ads
blob2e0207675b85f38f67ddb4a4d1bb1c8c19309333
1 -- { dg-do compile }
2 -- { dg-options "-gnatct" }
4 with Discr1_Pkg; use Discr1_Pkg;
6 package Discr1 is
8 procedure Proc (V : Variable_String_Array);
10 end Discr1;