tree-optimization/113385 - wrong loop father with early exit vectorization
[official-gcc.git] / gcc / testsuite / gnat.dg / concat5.adb
blobfabf24865d60edc75dec4c1e9d7ebc36e25ab065
1 -- { dg-do run }
2 -- { dg-options "-O" }
4 with Concat5_Pkg1; use Concat5_Pkg1;
6 procedure Concat5 is
7 begin
8 Scan ("-RTS=none");
9 end;