projects / deliverable / binutils-gdb.git / blame
| Commit | Line | Data |
|---|---|---|
| 20e56351 | 1 | # Test for proper diagnosis of overflowed memory regions. |
| b90efa5b | 2 | # Copyright (C) 2007-2015 Free Software Foundation, Inc. |
| 20e56351 DJ |
3 | # |
| 4 | # This file is part of the GNU Binutils. | |
| 5 | # | |
| 6 | # This program is free software; you can redistribute it and/or modify | |
| 7 | # it under the terms of the GNU General Public License as published by | |
| 8 | # the Free Software Foundation; either version 3 of the License, or | |
| 9 | # (at your option) any later version. | |
| 10 | # | |
| 11 | # This program is distributed in the hope that it will be useful, | |
| 12 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 13 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 14 | # GNU General Public License for more details. | |
| 15 | # | |
| 16 | # You should have received a copy of the GNU General Public License | |
| 17 | # along with this program; if not, write to the Free Software | |
| 18 | # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, | |
| 19 | # MA 02110-1301, USA. | |
| 20 | ||
| 21 | if ![is_elf_format] { | |
| 22 | return | |
| 23 | } | |
| 24 | ||
| 25 | load_lib ld-lib.exp | |
| 26 | ||
| 58b9344c AM |
27 | set old_ldflags $LDFLAGS |
| 28 | if { [istarget spu*-*-*] } { | |
| 29 | set LDFLAGS "$LDFLAGS --no-overlays" | |
| 30 | } | |
| 31 | ||
| 20e56351 DJ |
32 | set test_list [lsort [glob -nocomplain $srcdir/$subdir/rgn-over*.d]] |
| 33 | foreach test_file $test_list { | |
| 34 | set test_name [file rootname $test_file] | |
| 35 | set map_file "tmpdir/[file tail $test_name].map" | |
| 36 | verbose $test_name | |
| 37 | run_dump_test $test_name | |
| 38 | ||
| a2cab753 NS |
39 | if { ! [regexp ".*-ok.d" $test_file] } { |
| 40 | set testname "[file tail $test_name] (map check)" | |
| 41 | if [file exists $map_file] { | |
| 42 | # compare the map file to the expectations in the .d file | |
| 43 | # (run_dump_test can't do that). | |
| 44 | if [regexp_diff $map_file $test_file] { | |
| 45 | fail $testname | |
| 46 | } else { | |
| 47 | pass $testname | |
| 48 | } | |
| 20e56351 | 49 | } else { |
| a2cab753 | 50 | untested $testname |
| 20e56351 | 51 | } |
| 20e56351 DJ |
52 | } |
| 53 | } | |
| 58b9344c | 54 | set LDFLAGS $old_ldflags |