gvsafronov/futriix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

More testing

Browse Source 
Former-commit-id: 564d94f0653315ce05495a8d83ff8577a365c11b
This commit is contained in:
John Sully 2019-12-23 22:14:43 -05:00
parent f8c903475a
commit 3d265fc3df
1 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
tests/unit/flash.tcl
View File

@ -33,7 +33,20 @@ start_server [list tags {flash} overrides [list storage-provider {flash ./rocks.
r set testkey bar ex 10000 r set testkey bar ex 10000
assert_equal {1} [r dbsize] "Only one key after overwrite" assert_equal {1} [r dbsize] "Only one key after overwrite"
assert_equal {bar} [r get testkey] assert_equal {bar} [r get testkey]
} assert [expr [r ttl testkey] > 0]
}
test { EXPIRE of existing but flushed key } {
r flushall
assert_equal {0} [r dbsize]
r set testkey foo
assert_equal {1} [r dbsize]
r flushall cache
r expire testkey 10000
assert_equal {1} [r dbsize]
assert_equal {foo} [r get testkey]
assert [expr [r ttl testkey] > 0]
}
r flushall r flushall
foreach policy { foreach policy {