Fix test failure with tcl8.5 (test only issue)
Former-commit-id: 5e40ea6ee7f0f34a9e11fdd7518d81383dd73c41
This commit is contained in:
parent
a55fe8a3ba
commit
21bffec0d7
@ -238,7 +238,7 @@ start_server {tags {"bitops"}} {
|
|||||||
r set a "abcdefg"
|
r set a "abcdefg"
|
||||||
r bitop lshift x a 8
|
r bitop lshift x a 8
|
||||||
r get x
|
r get x
|
||||||
} "\x00abcdefg"
|
} "\000abcdefg"
|
||||||
|
|
||||||
test {BITOP lshift char} {
|
test {BITOP lshift char} {
|
||||||
r set a "\xAA"
|
r set a "\xAA"
|
||||||
|
Loading…
x
Reference in New Issue
Block a user