PR tree-optimization/86415 - strlen() not folded for substrings within constant arrays
[official-gcc.git] / gcc / testsuite / gnat.dg / case_optimization1.ads
blob737c9b70a56bbaa1a2ca9135db5a46a6e2975923
1 with Case_Optimization_Pkg1; use Case_Optimization_Pkg1;
3 package Case_Optimization1 is
5 function Len (E : Element) return Integer;
7 end Case_Optimization1;