From 8d4c84b0603650c343fedd514e0cb4a5b5c25058 Mon Sep 17 00:00:00 2001 From: dsmith Date: Mon, 23 Oct 2006 22:08:10 +0000 Subject: 2006-10-23 David Smith * test.exp (test_procedure): Handles cached module. --- testsuite/systemtap.syscall/ChangeLog | 4 ++++ testsuite/systemtap.syscall/test.exp | 3 +++ 2 files changed, 7 insertions(+) diff --git a/testsuite/systemtap.syscall/ChangeLog b/testsuite/systemtap.syscall/ChangeLog index 0879cc52..9a4afdad 100644 --- a/testsuite/systemtap.syscall/ChangeLog +++ b/testsuite/systemtap.syscall/ChangeLog @@ -1,3 +1,7 @@ +2006-10-23 David Smith + + * test.exp (test_procedure): Handles cached module. + 2006-09-26 David Smith * test.tcl: Looks for 'staprun' instead of 'stpd'. diff --git a/testsuite/systemtap.syscall/test.exp b/testsuite/systemtap.syscall/test.exp index 0be44aec..d457e125 100644 --- a/testsuite/systemtap.syscall/test.exp +++ b/testsuite/systemtap.syscall/test.exp @@ -17,6 +17,9 @@ foreach line [split $res1 \n] { if {[regexp {Pass 4: compiled C into "([^\"]*)"} $line match module]} { break } + if {[regexp {Pass 4: using cached /.*/(stap_[0-9a-f_]*.ko)} $line match module]} { + break + } } if {![info exists module]} { -- cgit