frunaligned.adb « gnat.dg « testsuite « gcc - cbb-gcc-4.6.4 - compiler building blocks: cbb-gcc-4.6.4: including full support for the midipix targets

summary refs log tree commit diff

path: root/gcc/testsuite/gnat.dg/frunaligned.adb

blob: a57e87227e08a45e6f08f18ff4f0f38f970bbd51 (plain)

--  { dg-do compile }
--  { dg-options "-gnatws" }
with FRUnaligned1; use FRUnaligned1;
function FRUnaligned return r is
   ss : s;
begin
   return ss.y;
end;