"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "tests/unit/moduleapi/testrdb.tcl" between
redis-6.0.7.tar.gz and redis-6.0.8.tar.gz

About: redis is an advanced key-value store. It is often referred to as a data structure server since keys can contain strings, hashes, lists, sets and sorted sets.

testrdb.tcl  (redis-6.0.7):testrdb.tcl  (redis-6.0.8)
skipping to change at line 15 skipping to change at line 15
start_server [list overrides [list loadmodule "$testmodule"]] { start_server [list overrides [list loadmodule "$testmodule"]] {
r testrdb.set.key key1 value1 r testrdb.set.key key1 value1
assert_equal "value1" [r testrdb.get.key key1] assert_equal "value1" [r testrdb.get.key key1]
r debug reload r debug reload
assert_equal "value1" [r testrdb.get.key key1] assert_equal "value1" [r testrdb.get.key key1]
} }
} }
test {modules global are lost without aux} { test {modules global are lost without aux} {
set server_path [tmpdir "server.module-testrdb"] set server_path [tmpdir "server.module-testrdb"]
start_server [list overrides [list loadmodule "$testmodule" "dir" $serve r_path]] { start_server [list overrides [list loadmodule "$testmodule" "dir" $serve r_path] keep_persistence true] {
r testrdb.set.before global1 r testrdb.set.before global1
assert_equal "global1" [r testrdb.get.before] assert_equal "global1" [r testrdb.get.before]
} }
start_server [list overrides [list loadmodule "$testmodule" "dir" $serve r_path]] { start_server [list overrides [list loadmodule "$testmodule" "dir" $serve r_path]] {
assert_equal "" [r testrdb.get.before] assert_equal "" [r testrdb.get.before]
} }
} }
test {modules are able to persist globals before and after} { test {modules are able to persist globals before and after} {
set server_path [tmpdir "server.module-testrdb"] set server_path [tmpdir "server.module-testrdb"]
start_server [list overrides [list loadmodule "$testmodule 2" "dir" $ser ver_path]] { start_server [list overrides [list loadmodule "$testmodule 2" "dir" $ser ver_path] keep_persistence true] {
r testrdb.set.before global1 r testrdb.set.before global1
r testrdb.set.after global2 r testrdb.set.after global2
assert_equal "global1" [r testrdb.get.before] assert_equal "global1" [r testrdb.get.before]
assert_equal "global2" [r testrdb.get.after] assert_equal "global2" [r testrdb.get.after]
} }
start_server [list overrides [list loadmodule "$testmodule 2" "dir" $ser ver_path]] { start_server [list overrides [list loadmodule "$testmodule 2" "dir" $ser ver_path]] {
assert_equal "global1" [r testrdb.get.before] assert_equal "global1" [r testrdb.get.before]
assert_equal "global2" [r testrdb.get.after] assert_equal "global2" [r testrdb.get.after]
} }
} }
test {modules are able to persist globals just after} { test {modules are able to persist globals just after} {
set server_path [tmpdir "server.module-testrdb"] set server_path [tmpdir "server.module-testrdb"]
start_server [list overrides [list loadmodule "$testmodule 1" "dir" $ser ver_path]] { start_server [list overrides [list loadmodule "$testmodule 1" "dir" $ser ver_path] keep_persistence true] {
r testrdb.set.after global2 r testrdb.set.after global2
assert_equal "global2" [r testrdb.get.after] assert_equal "global2" [r testrdb.get.after]
} }
start_server [list overrides [list loadmodule "$testmodule 1" "dir" $ser ver_path]] { start_server [list overrides [list loadmodule "$testmodule 1" "dir" $ser ver_path]] {
assert_equal "global2" [r testrdb.get.after] assert_equal "global2" [r testrdb.get.after]
} }
} }
tags {repl} { tags {repl} {
test {diskless loading short read with module} { test {diskless loading short read with module} {
 End of changes. 3 change blocks. 
3 lines changed or deleted 3 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)