diff options
| author | Olivier Hainque <hainque@gcc.gnu.org> | 2010-09-13 21:44:26 +0000 |
|---|---|---|
| committer | Olivier Hainque <hainque@gcc.gnu.org> | 2010-09-13 21:44:26 +0000 |
| commit | 10d58e6b567f19a1efe32b0fb861d9532964e96e (patch) | |
| tree | 6c906b9391127d948e5fc8e6ee8028d976f809dc | |
| parent | 5c9bf75299ce79b0fccb4219ea7264fb2a6d08a4 (diff) | |
| download | gcc-10d58e6b567f19a1efe32b0fb861d9532964e96e.zip gcc-10d58e6b567f19a1efe32b0fb861d9532964e96e.tar.gz gcc-10d58e6b567f19a1efe32b0fb861d9532964e96e.tar.bz2 | |
Fix accidental mishap on testcase.
From-SVN: r164259
| -rw-r--r-- | gcc/testsuite/gnat.dg/memtrap.adb | 15 |
1 files changed, 0 insertions, 15 deletions
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" } } |