diff options
Diffstat (limited to 'ld/testsuite/ld-size')
| -rw-r--r-- | ld/testsuite/ld-size/size.exp | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/ld/testsuite/ld-size/size.exp b/ld/testsuite/ld-size/size.exp index 2a16c71..5a774fa 100644 --- a/ld/testsuite/ld-size/size.exp +++ b/ld/testsuite/ld-size/size.exp @@ -161,6 +161,20 @@ run_cc_link_tests [list \ ] \ ] +# Check if size relocation works at run-time. +catch "exec tmpdir/size-7.exe > tmpdir/dump.out" exec_output +if ![string match "" $exec_output] then { + send_log "No run-time size relocation support: $exec_output\n" + verbose "No run-time size relocation support: $exec_output" 1 + return +} + +if { [regexp_diff "tmpdir/dump.out" "$srcdir/$subdir/size-7.out" ] } then { + verbose "output is [file_contents "tmpdir/dump.out"]" 2 + fail "Run-time size relocation" + return +} + # Run-time size relocation tests. run_ld_link_exec_tests [] [list \ [list \ @@ -295,17 +309,3 @@ run_ld_link_exec_tests [] [list \ "size-10.out" \ ] \ ] - -# Check if size relocation works at run-time. -catch "exec tmpdir/size-7.exe > tmpdir/dump.out" exec_output -if ![string match "" $exec_output] then { - send_log "No run-time size relocation support: $exec_output\n" - verbose "No run-time size relocation support: $exec_output" 1 - return -} - -if { [regexp_diff "tmpdir/dump.out" "$srcdir/$subdir/size-7.out" ] } then { - verbose "output is [file_contents "tmpdir/dump.out"]" 2 - fail "Run-time size relocation" - return -} |