* config/vx-gdb.exp (gdb_load): Update test of vxworks_ld return code.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 1a2b9e999f35052c20fde2be3b16286b7605fea0..83bf398660b569d6461bec9cc538ea25ea87eccd 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,4 +1,6 @@
-Tue Mar 21 20:52:36 1995  Doug Evans  <dje@cygnus.com>
+Tue Mar 21 21:41:04 1995  Doug Evans  <dje@canuck.cygnus.com>
+
+       * config/vx-gdb.exp (gdb_load): Update test of vxworks_ld return code.
 
        * gdb.base/a2-run.exp: Change argument to istarget from
        "*-*-vxworks" to "*-*-vxworks*".

diff --git a/gdb/testsuite/config/vx-gdb.exp b/gdb/testsuite/config/vx-gdb.exp
index a1339116a745cb88d098144a03735fecd3e79ac7..5ebcefa18e1782a0a05a62e4633c70dc069c6de9 100644 (file)
--- a/gdb/testsuite/config/vx-gdb.exp
+++ b/gdb/testsuite/config/vx-gdb.exp
@@ -49,7 +49,7 @@ proc gdb_load { arg } {
 #    spawn_vxgdb
     set result 0
 
-    if [vxworks_ld $shell_id $arg]<0 then {
+    if { [vxworks_ld $shell_id $arg] != 0 } {
        perror "Couldn't load $arg"
        return -1
     }