PR tree-optimization/81303
[official-gcc.git] / gcc / testsuite / gnat.dg / frunaligned.adb
bloba57e87227e08a45e6f08f18ff4f0f38f970bbd51
1 -- { dg-do compile }
2 -- { dg-options "-gnatws" }
3 with FRUnaligned1; use FRUnaligned1;
4 function FRUnaligned return r is
5 ss : s;
6 begin
7 return ss.y;
8 end;