From 8267555c5fefa23a30988e3327c4aaeeed662c54 Mon Sep 17 00:00:00 2001
From: hunt <hunt>
Date: Mon, 21 Aug 2006 15:37:08 +0000
Subject: 2006-08-21  Martin Hunt  <hunt@redhat.com>

	* lib/stap_run.exp: Check for existence of installtest_p
	before running it. This reenables running individual tests
	with runtest.
	* lib/stap_run2.exp: Ditto.
	* lib/stap_run_binary.exp: Ditto.
---
 testsuite/lib/stap_run_binary.exp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'testsuite/lib/stap_run_binary.exp')

diff --git a/testsuite/lib/stap_run_binary.exp b/testsuite/lib/stap_run_binary.exp
index 6d5de4b8..f29e8f35 100644
--- a/testsuite/lib/stap_run_binary.exp
+++ b/testsuite/lib/stap_run_binary.exp
@@ -6,7 +6,7 @@
 # global result_string must be set to the expected output
 
 proc stap_run_binary { TEST_NAME} {
-  if {![installtest_p]} { untested $TEST_NAME; return }
+  if {[info procs installtest_p] != "" && ![installtest_p]} {untested $TEST_NAME; return}
 
   set hex_args {-ve 8/1 "%02x " "\n"}
   set res [exec stap $TEST_NAME | hexdump $hex_args] 
-- 
cgit