Index: gdb/testsuite/gdb.trace/tstatus.exp |
diff --git a/gdb/testsuite/gdb.trace/tstatus.exp b/gdb/testsuite/gdb.trace/tstatus.exp |
index 1146e1fbc1d202ee3918b2c3da637e020724073f..fdeb0dd5c89fb70ca80e8fa68735654ee40f8ecc 100644 |
--- a/gdb/testsuite/gdb.trace/tstatus.exp |
+++ b/gdb/testsuite/gdb.trace/tstatus.exp |
@@ -14,10 +14,8 @@ |
load_lib "trace-support.exp" |
-set testfile "actions" |
+standard_testfile actions.c |
set executable $testfile |
-set srcfile $testfile.c |
-set binfile $objdir/$subdir/$testfile |
set expfile tstatus.exp |
if [prepare_for_testing $expfile $executable $srcfile \ |
@@ -36,7 +34,7 @@ if ![gdb_target_supports_trace] { |
return -1 |
} |
-set libipa $objdir/../gdbserver/libinproctrace.so |
+set libipa [get_in_proc_agent] |
gdb_load_shlibs $libipa |
# Can't use prepare_for_testing, because that splits compiling into |
@@ -166,7 +164,7 @@ proc test_tracepoints {} { |
gdb_reinitialize_dir $srcdir/$subdir |
-if { [gdb_test "info sharedlibrary" ".*libinproctrace\.so.*" "IPA loaded"] != 0 } { |
+if { [gdb_test "info sharedlibrary" ".*${libipa}.*" "IPA loaded"] != 0 } { |
untested "Could not find IPA lib loaded" |
return 1 |
} |