Wattributes-10.c: Add -fno-common option on hppa*-*-hpux*.
[official-gcc.git] / gcc / testsuite / gnat.dg / access_func.adb
blob8354e7453552b9915c305055d0402c01476c3454
1 -- { dg-do compile }
3 procedure access_func is
4 type Abomination is access
5 function (X : Integer) return access
6 function (Y : Float) return access
7 function return Integer;
8 begin
9 null;
10 end;