From 42f18f4c08ddcd67f8826b95924d08ec1d1e5522 Mon Sep 17 00:00:00 2001 From: Ken Raeburn Date: Tue, 21 Sep 1999 21:38:09 +0000 Subject: [PATCH] * api.2/init-v2.exp (test109): Wait for prompt between commands git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@11833 dc483132-0cff-0310-8789-dd5450dbe970 --- src/lib/kadm5/unit-test/ChangeLog | 4 ++++ src/lib/kadm5/unit-test/api.2/init-v2.exp | 11 +++++++++++ 2 files changed, 15 insertions(+) diff --git a/src/lib/kadm5/unit-test/ChangeLog b/src/lib/kadm5/unit-test/ChangeLog index 41c079143..a771f728f 100644 --- a/src/lib/kadm5/unit-test/ChangeLog +++ b/src/lib/kadm5/unit-test/ChangeLog @@ -1,3 +1,7 @@ +1999-09-21 Ken Raeburn + + * api.2/init-v2.exp (test109): Wait for prompt between commands. + 1999-09-01 Ken Raeburn * api.2/init-v2.exp (RESOLVE): New variable. diff --git a/src/lib/kadm5/unit-test/api.2/init-v2.exp b/src/lib/kadm5/unit-test/api.2/init-v2.exp index fe0721494..6be880dd0 100644 --- a/src/lib/kadm5/unit-test/api.2/init-v2.exp +++ b/src/lib/kadm5/unit-test/api.2/init-v2.exp @@ -197,6 +197,17 @@ proc test109 {} { return; } send "puts \$p\n" + expect { + -re "$prompt" { } + timeout { + error_and_restart "$test: timeout getting prompt" + return + } + eof { + error_and_restart "$test: eof getting prompt" + return + } + } send "lindex \$p 4\n" expect { -re "(\[0-9\]+)\n$prompt" {set max_life $expect_out(1,string) } -- 2.26.2