Commit 503a2e58 authored by David Byers's avatar David Byers

(l2g_start): Use exp_continue instead of continue -expect.

(lyskomd_start, lyskomd_fail_start, dbck_run): Ditto.
parent 72b159ba
...@@ -100,7 +100,7 @@ proc l2g_start {} { ...@@ -100,7 +100,7 @@ proc l2g_start {} {
-re "^Where does the trace want to go today. .stderr.$nl" { -re "^Where does the trace want to go today. .stderr.$nl" {
pass "Tracing is activated ($MEMTRACE)" pass "Tracing is activated ($MEMTRACE)"
send "$MEMTRACE\n" send "$MEMTRACE\n"
continue -expect exp_continue
} }
-re "^l2g> " { -re "^l2g> " {
pass "$test" pass "$test"
...@@ -347,12 +347,12 @@ proc lyskomd_start {{aux_item_conf_file ""} \ ...@@ -347,12 +347,12 @@ proc lyskomd_start {{aux_item_conf_file ""} \
} }
send "$MEMTRACE\n" send "$MEMTRACE\n"
set mem_trace 1 set mem_trace 1
continue -expect exp_continue
} }
-re "WARNING: This server was compiled with --with-debug-calls" { -re "WARNING: This server was compiled with --with-debug-calls" {
pass "debug calls are enabled" pass "debug calls are enabled"
set debug_calls 1 set debug_calls 1
continue -expect exp_continue
} }
-re "MSG: garb ready. 0 texts deleted.$nl" {pass "$test"} -re "MSG: garb ready. 0 texts deleted.$nl" {pass "$test"}
timeout {fail "$test (timeout)"} timeout {fail "$test (timeout)"}
...@@ -439,7 +439,7 @@ proc lyskomd_fail_start {{aux_item_conf_file "" } ...@@ -439,7 +439,7 @@ proc lyskomd_fail_start {{aux_item_conf_file "" }
-re "Where does the trace want to go today. .stderr." { -re "Where does the trace want to go today. .stderr." {
pass "Tracing is activated ($MEMTRACE)" pass "Tracing is activated ($MEMTRACE)"
send "$MEMTRACE\n" send "$MEMTRACE\n"
continue -expect exp_continue
} }
-re "Search for the core" { pass "$test" } -re "Search for the core" { pass "$test" }
timeout {fail "$test (timeout)" } timeout {fail "$test (timeout)" }
...@@ -519,7 +519,7 @@ proc dbck_run {} { ...@@ -519,7 +519,7 @@ proc dbck_run {} {
-re "^Where does the trace want to go today. .stderr.$nl" { -re "^Where does the trace want to go today. .stderr.$nl" {
pass "Tracing is activated ($DBCK_MEMTRACE)" pass "Tracing is activated ($DBCK_MEMTRACE)"
send "$DBCK_MEMTRACE\n" send "$DBCK_MEMTRACE\n"
continue -expect exp_continue
} }
-re "^MSG: init_cache: using datafile\.$nl" { -re "^MSG: init_cache: using datafile\.$nl" {
pass "$test" pass "$test"
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment