summaryrefslogtreecommitdiff
path: root/tests/instances.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/instances.tcl')
-rw-r--r--tests/instances.tcl13
1 files changed, 13 insertions, 0 deletions
diff --git a/tests/instances.tcl b/tests/instances.tcl
index 4e4091c31..56a51a872 100644
--- a/tests/instances.tcl
+++ b/tests/instances.tcl
@@ -105,6 +105,15 @@ proc spawn_instance {type base_port count {conf {}} {base_conf_file ""}} {
} else {
puts $cfg "port $port"
}
+
+ if {$::log_req_res} {
+ puts $cfg "req-res-logfile stdout.reqres"
+ }
+
+ if {$::force_resp3} {
+ puts $cfg "client-default-resp 3"
+ }
+
puts $cfg "repl-diskless-sync-delay 0"
puts $cfg "dir ./$dirname"
puts $cfg "logfile log.txt"
@@ -293,6 +302,10 @@ proc parse_options {} {
set ::stop_on_failure 1
} elseif {$opt eq {--loop}} {
set ::loop 1
+ } elseif {$opt eq {--log-req-res}} {
+ set ::log_req_res 1
+ } elseif {$opt eq {--force-resp3}} {
+ set ::force_resp3 1
} elseif {$opt eq "--help"} {
puts "--single <pattern> Only runs tests specified by pattern."
puts "--dont-clean Keep log files on exit."