From 7020f05c275a933720905bc7e4a2446175f28b0f Mon Sep 17 00:00:00 2001 From: Pedro Alves Date: Tue, 30 Oct 2007 19:23:18 +0000 Subject: [PATCH] * lib/gdb.exp, gdb.base/sepdebug.exp: Replace usage of eq and ne with [string compare]. --- gdb/testsuite/ChangeLog | 5 +++++ gdb/testsuite/gdb.base/sepdebug.exp | 6 +++--- gdb/testsuite/lib/gdb.exp | 2 +- 3 files changed, 9 insertions(+), 4 deletions(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index a200ed96b67..551c8d693b0 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-10-30 Pedro Alves + + * lib/gdb.exp, gdb.base/sepdebug.exp: Replace usage of eq and ne + with [string compare]. + 2007-10-30 Pedro Alves * gdb.base/sepdebug.exp (binfile): Add ${EXEEXT}. diff --git a/gdb/testsuite/gdb.base/sepdebug.exp b/gdb/testsuite/gdb.base/sepdebug.exp index b52cfff3129..2936fe965a9 100644 --- a/gdb/testsuite/gdb.base/sepdebug.exp +++ b/gdb/testsuite/gdb.base/sepdebug.exp @@ -955,7 +955,7 @@ test_different_dir debuglink "${objdir}/${subdir}" 0 # NT_GNU_BUILD_ID / .note.gnu.build-id test: set build_id_debug_filename [build_id_debug_filename_get $binfile] -if {$build_id_debug_filename eq ""} { +if ![string compare $build_id_debug_filename ""] then { unsupported "build-id is not supported by the compiler" # Spare debug files may confuse testsuite runs in the future. @@ -964,10 +964,10 @@ if {$build_id_debug_filename eq ""} { set build_id_debugself_filename [build_id_debug_filename_get $debugfile] set test "build-id support by binutils" set xfail 0 - if {$build_id_debugself_filename eq ""} { + if ![string compare $build_id_debugself_filename ""] then { unsupported $test set xfail 1 - } elseif {$build_id_debugself_filename ne $build_id_debug_filename} { + } elseif {[string compare $build_id_debugself_filename $build_id_debug_filename] != 0} then { fail $test } else { pass $test diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 5c5f9bff534..edbc606f112 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -2505,7 +2505,7 @@ proc build_id_debug_filename_get { exec } { set data [read $fi] close $fi file delete $tmp - if {$data eq ""} { + if ![string compare $data ""] then { return "" } # Convert it to hex. -- 2.30.2