OSDN Git Service

* gcc.dg/march.c: Ignore a note for some targets.
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / aliasing3.adb
1 -- { dg-do run }
2 -- { dg-options "-O2 -gnatn" }
3
4 with Aliasing3_Pkg; use Aliasing3_Pkg;
5
6 procedure Aliasing3 is
7 begin
8   Pointer.A(1) := 5;
9   Test (Block.A);
10 end;