From 4349401a55b51937cb25cf0c9c5885b0284f7505 Mon Sep 17 00:00:00 2001 From: Chris Meek Date: Fri, 8 Jun 2012 13:58:53 -0400 Subject: [PATCH] testsuite: Fix library.exp to work with relative paths More fixes for the issues caused by the automake changes in commit c66be968a4ea. --- testsuite/systemtap.base/library.exp | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/testsuite/systemtap.base/library.exp b/testsuite/systemtap.base/library.exp index b4bdeafba..6fc948eaa 100644 --- a/testsuite/systemtap.base/library.exp +++ b/testsuite/systemtap.base/library.exp @@ -64,12 +64,12 @@ if { [error_handler [expr {$res == ""}] "target_compile sdt_misc.x"] } { return # Test globbing -proc globbing_test { mssg } { +proc globbing_test { mssg script } { global sopath exepath srcdir subdir stap_path eval set globs "{{*} {*libsdt*} $sopath}" foreach glob $globs { set ok 0 -spawn $stap_path -c $exepath $srcdir/$subdir/library.stp $exepath "$glob" +spawn $stap_path -c $exepath $script $exepath "$glob" expect { -timeout 180 @@ -99,10 +99,11 @@ error_handler [expr {$ok == 15}] "sdt_misc $glob $mssg ($ok != 15)" } ; # foreach glob } ; # proc globbing_test -globbing_test "" +set script_path [fullpath $srcdir/$subdir/library.stp] +globbing_test "" $script_path set savedir [pwd] cd /tmp -globbing_test "rpath" +globbing_test "rpath" $script_path cd $savedir # Test --ldd -- 2.43.5