Wattributes-10.c: Add -fno-common option on hppa*-*-hpux*.
[official-gcc.git] / gcc / testsuite / gnat.dg / memtrap.adb
blobae87e8528737330be41528976596c5acbb55863d
1 -- { dg-do compile }
2 -- { dg-options "-O2" }
4 with System;
6 procedure Memtrap is
7 X : integer;
8 for X'address use System.Null_Address;
9 begin
10 X := 12;
11 exception
12 when others => null;
13 end;
15 -- { dg-final { scan-assembler "__gnat_begin_handler|__gnat_raise_nodefer" } }