From 10d58e6b567f19a1efe32b0fb861d9532964e96e Mon Sep 17 00:00:00 2001 From: Olivier Hainque Date: Mon, 13 Sep 2010 21:44:26 +0000 Subject: Fix accidental mishap on testcase. From-SVN: r164259 --- gcc/testsuite/gnat.dg/memtrap.adb | 15 --------------- 1 file changed, 15 deletions(-) (limited to 'gcc') diff --git a/gcc/testsuite/gnat.dg/memtrap.adb b/gcc/testsuite/gnat.dg/memtrap.adb index b755759..ae87e85 100644 --- a/gcc/testsuite/gnat.dg/memtrap.adb +++ b/gcc/testsuite/gnat.dg/memtrap.adb @@ -12,19 +12,4 @@ exception when others => null; end; --- { dg-final { scan-assembler "__gnat_begin_handler" } } --- { dg-do compile } --- { dg-options "-O2" } - -with System; - -procedure Memtrap is - X : integer; - for X'address use System.Null_Address; -begin - X := 12; -exception - when others => null; -end; - -- { dg-final { scan-assembler "__gnat_begin_handler|__gnat_raise_nodefer" } } -- cgit v1.1