f5d5709
2004-02-23  Elena Zannoni  <ezannoni@redhat.com>
f5d5709
f5d5709
        * gdb.gdb/selftest.exp: Make sure that the debug directory is
f5d5709
        set up properly.
f5d5709
        * gdb.gdb/complaints.exp: Ditto.
f5d5709
        * gdb.gdb/xfullpath.exp: Ditto.
f5d5709
        * gdb.gdb/observer.exp: Ditto.
f5d5709
Jan Kratochvil 2c55a54
Index: gdb-7.6.90.20140127/gdb/testsuite/lib/selftest-support.exp
1592379
===================================================================
Jan Kratochvil 2c55a54
--- gdb-7.6.90.20140127.orig/gdb/testsuite/lib/selftest-support.exp	2014-01-27 22:42:04.022535966 +0100
Jan Kratochvil 2c55a54
+++ gdb-7.6.90.20140127/gdb/testsuite/lib/selftest-support.exp	2014-01-27 22:42:42.630565675 +0100
Jan Kratochvil 2c55a54
@@ -136,18 +136,18 @@ proc do_self_tests {function body} {
Jan Kratochvil 2c55a54
     }
Jan Kratochvil 872aab0
 
Jan Kratochvil 872aab0
     # Remove any old copy lying around.
Jan Kratochvil 2c55a54
-    remote_file host delete $xgdb
Jan Kratochvil 2c55a54
+    #remote_file host delete $xgdb
Jan Kratochvil 872aab0
 
Jan Kratochvil 872aab0
     gdb_start
Jan Kratochvil 2c55a54
-    set file [remote_download host $GDB_FULLPATH $xgdb]
Jan Kratochvil 2c55a54
+    #set file [remote_download host $GDB_FULLPATH $xgdb]
Jan Kratochvil 872aab0
 
Jan Kratochvil 872aab0
-    set result [selftest_setup $file $function]
Jan Kratochvil 872aab0
+    set result [selftest_setup $GDB_FULLPATH $function]
Jan Kratochvil 872aab0
     if {$result == 0} then {
Jan Kratochvil 872aab0
 	set result [uplevel $body]
Jan Kratochvil 872aab0
     }
Jan Kratochvil 872aab0
 
Jan Kratochvil 872aab0
     gdb_exit
Jan Kratochvil 872aab0
-    catch "remote_file host delete $file"
Jan Kratochvil 872aab0
+    #catch "remote_file host delete $file"
Jan Kratochvil 872aab0
 
Jan Kratochvil 872aab0
     if {$result < 0} then {
Jan Kratochvil 872aab0
 	warning "Couldn't test self"