RISC-V: Add support for riscv-*-*.
[official-gcc.git] / gcc / testsuite / gnat.dg / discr34.adb
blob7beab9540d0ade9ea4b906f600cc315cd86db7fb
1 -- { dg-do compile }
3 with Discr34_Pkg; use Discr34_Pkg;
5 procedure Discr34 is
6 Object : Rec := F;
7 begin
8 null;
9 end;