mirror of
https://codeberg.org/redict/redict.git
synced 2025-01-22 16:18:28 -05:00
26 lines
649 B
Tcl
26 lines
649 B
Tcl
|
set testmodule [file normalize tests/modules/eventloop.so]
|
||
|
|
||
|
start_server {tags {"modules"}} {
|
||
|
r module load $testmodule
|
||
|
|
||
|
test "Module eventloop sendbytes" {
|
||
|
assert_match "OK" [r test.sendbytes 10000000]
|
||
|
assert_match "OK" [r test.sendbytes 2000000]
|
||
|
assert_match "OK" [r test.sendbytes 800000000]
|
||
|
}
|
||
|
|
||
|
test "Module eventloop iteration" {
|
||
|
set iteration [r test.iteration]
|
||
|
set next_iteration [r test.iteration]
|
||
|
assert {$next_iteration > $iteration}
|
||
|
}
|
||
|
|
||
|
test "Module eventloop sanity" {
|
||
|
r test.sanity
|
||
|
}
|
||
|
|
||
|
test "Module eventloop oneshot" {
|
||
|
r test.oneshot
|
||
|
}
|
||
|
}
|