15 lines
521 B
Tcl
15 lines
521 B
Tcl
set testmodule [file normalize tests/modules/load.so]
|
|
|
|
if {$::flash_enabled} {
|
|
start_server [list tags [list "modules"] overrides [list storage-provider {flash ./rocks.db.master} databases 256 loadmodule $testmodule]] {
|
|
test "Module is notified of keys loaded from flash" {
|
|
r flushall
|
|
r set foo bar
|
|
r set bar foo
|
|
r set foobar barfoo
|
|
assert_equal [r load.count] 0
|
|
r debug reload
|
|
assert_equal [r load.count] 3
|
|
}
|
|
}
|
|
} |