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.exp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/testsuite/lib/stap_run.exp b/testsuite/lib/stap_run.exp
index d230e8e5..2d378154 100644
--- a/testsuite/lib/stap_run.exp
+++ b/testsuite/lib/stap_run.exp
@@ -14,7 +14,7 @@
 #     returns 1 if there was a problem
 # Additional arguments are passed to stap as-is.
 proc stap_run { TEST_NAME {LOAD_GEN_FUNCTION ""} {OUTPUT_CHECK_STRING ""} args } {
-    if {![installtest_p]} { untested $TEST_NAME; return }
+    if {[info procs installtest_p] != "" && ![installtest_p]} { untested $TEST_NAME; return }
 
     set cmd [concat {stap -v} $args]
     if [file readable $TEST_NAME] {
-- 
cgit