Commit 68254919 authored by Pieter Noordhuis's avatar Pieter Noordhuis
Browse files

Fix assertion function on value encoding

parent 0c7a9dec
...@@ -36,8 +36,8 @@ proc assert_encoding {enc key} { ...@@ -36,8 +36,8 @@ proc assert_encoding {enc key} {
# Swapped out values don't have an encoding, so make sure that # Swapped out values don't have an encoding, so make sure that
# the value is swapped in before checking the encoding. # the value is swapped in before checking the encoding.
set dbg [r debug object $key] set dbg [r debug object $key]
while {[string match "* swapped:*" $dbg]} { while {[string match "* swapped at:*" $dbg]} {
[r debug swapin $key] r debug swapin $key
set dbg [r debug object $key] set dbg [r debug object $key]
} }
assert_match "* encoding:$enc *" $dbg assert_match "* encoding:$enc *" $dbg
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment