Home
last modified time | relevance | path

Searched refs:assert_equal (Results 1 – 25 of 33) sorted by relevance

12

/f-stack/app/redis-5.0.5/tests/unit/
H A Dpubsub.tcl8 assert_equal $type [lindex $msg 0]
71 assert_equal 1 [r publish chan1 hello]
72 assert_equal 1 [r publish chan2 world]
78 assert_equal 0 [r publish chan1 hello]
79 assert_equal 1 [r publish chan2 world]
84 assert_equal 0 [r publish chan1 hello]
85 assert_equal 0 [r publish chan2 world]
143 assert_equal 0 [r publish foo1 hello]
231 assert_equal {1} [psubscribe $rd1 *]
240 assert_equal {1} [psubscribe $rd1 *]
[all …]
H A Dslowlog.tcl9 assert_equal [r slowlog len] 0
11 assert_equal [r slowlog len] 1
37 assert_equal [llength $e] 6
38 assert_equal [lindex $e 0] 105
39 assert_equal [expr {[lindex $e 2] > 100000}] 1
40 assert_equal [lindex $e 3] {debug sleep 0.2}
41 assert_equal {foobar} [lindex $e 5]
64 assert_equal [r slowlog len] 0
68 assert_equal [r slowlog len] 1
87 assert_equal [r slowlog len] 1
[all …]
H A Dsort.tcl49 assert_equal $result [r sort tosort BY weight_*]
69 assert_equal 16 [llength $res]
70 foreach item $res { assert_equal {} $item }
77 assert_equal $id1 $id2
78 assert_equal $w1 [r get weight_$id1]
79 assert_equal $w2 [r get weight_$id1]
85 assert_equal $result [r lrange sort-res 0 -1]
86 assert_equal 16 [r llen sort-res]
92 assert_equal $result [r lrange sort-res 0 -1]
93 assert_equal 16 [r llen sort-res]
[all …]
H A Dquit.tcl12 assert_equal OK [r quit]
21 assert_equal OK [r read]
25 assert_equal {} [r get foo]
33 assert_equal OK [r read]
37 assert_equal {} [r get foo]
H A Dscan.tcl17 assert_equal 1000 [llength $keys]
35 assert_equal 1000 [llength $keys]
53 assert_equal 100 [llength $keys]
86 assert_equal 100 [llength $keys]
126 assert_equal $count [llength $keys2]
166 assert_equal $count [llength $keys2]
196 assert_equal 100 [llength $keys2]
204 assert_equal [lsort -unique [lindex $res 1]] {a}
206 assert_equal [lsort -unique [lindex $res 1]] {1}
H A Dintrospection.tcl38 assert_equal [r client setname myname] {OK}
43 assert_equal [r client setname someothername] {OK}
50 assert_equal [$rd read] "OK"
H A Daofrw.tcl95 assert_equal [r object encoding key] $e
122 assert_equal [r object encoding key] $e
149 assert_equal [r object encoding key] $e
175 assert_equal [r object encoding key] $e
H A Dprotocol.tcl6 assert_equal "PONG" [r ping]
13 assert_equal PONG [r ping]
H A Dbitops.tcl89 assert_equal [r bitcount s 0 -1] [count_bits "foobar"]
90 assert_equal [r bitcount s 1 -2] [count_bits "ooba"]
91 assert_equal [r bitcount s -2 1] [count_bits ""]
92 assert_equal [r bitcount s 0 1000] [count_bits "foobar"]
180 assert_equal [r get target] [simulate_bit_op $op {*}$vec]
191 assert_equal [r get target] [simulate_bit_op not $str]
/f-stack/app/redis-5.0.5/tests/unit/type/
H A Dlist.tcl11 assert_equal 1 [r lpush myziplist1 aa]
14 assert_equal 3 [r llen myziplist1]
19 assert_equal cc [r rpop myziplist1]
43 assert_equal 3 [r llen mylist1]
48 assert_equal c [r rpop mylist1]
56 assert_equal 3 [r llen mylist2]
62 assert_equal c [r lpop mylist2]
77 assert_equal 1 [r del mylist2]
144 assert_equal d [$rd read]
231 assert_equal foo [$rd read]
[all …]
H A Dzset.tcl160 assert_equal 3 [r zcard ztmp]
714 assert_equal 1 [r zcard z1]
715 assert_equal 3 [r zcard z2]
721 assert_equal 1 [r zcard z1]
722 assert_equal 1 [r zcard z2]
733 assert_equal 0 [r zcard z1]
734 assert_equal 1 [r zcard z2]
879 assert_equal 0 $delta
961 assert_equal {} $err
1084 assert_equal 0 $diff
[all …]
H A Dstring.tcl77 assert_equal 0 [r setnx x 20]
78 assert_equal 10 [r get x]
101 assert_equal 1 [r setnx x 20]
102 assert_equal 20 [r get x]
151 assert_equal 0 [r strlen notakey]
269 assert_equal "foo" [r get mykey]
273 assert_equal 0 [r exists mykey]
283 assert_equal "boo" [r get mykey]
303 assert_equal 2234 [r get mykey]
310 assert_equal 1234 [r get mykey]
[all …]
H A Dset.tcl15 assert_equal 1 [r sadd myset bar]
16 assert_equal 0 [r sadd myset bar]
17 assert_equal 2 [r scard myset]
27 assert_equal 1 [r sadd myset 16]
28 assert_equal 0 [r sadd myset 16]
29 assert_equal 2 [r scard myset]
44 assert_equal 1 [r sadd myset a]
58 assert_equal 1 [r sadd myset 512]
95 assert_equal 0 [r srem myset 6]
96 assert_equal 1 [r srem myset 4]
[all …]
H A Dlist-3.tcl12 assert_equal [r lindex l 0] [lindex $mylist 0]
13 assert_equal [r lindex l 1] [lindex $mylist 1]
88 assert_equal [llength $l] [r llen l]
92 assert_equal [lindex $l $i] [r lindex l $i]
113 assert_equal [llength $l] [r llen l]
116 assert_equal [lindex $l $i] [r lindex l $i]
H A Dlist-2.tcl34 assert_equal $mylist [r lrange mylist 0 -1] "failed trim"
41 assert_equal $mylist [r lrange mylist 0 -1] "failed append match"
H A Dhash.tcl233 assert_equal 0 [r hdel myhash x y]
234 assert_equal 2 [r hdel myhash a c f]
241 assert_equal 3 [r hdel myhash a b c d e]
242 assert_equal 0 [r exists myhash]
464 assert_equal $v [r hget hash $k]
466 assert_equal [array size hash] [r hlen hash]
501 assert_equal $v [r hget hash $k]
503 assert_equal [array size hash] [r hlen hash]
H A Dstream.tcl58 assert_equal 2 [r XLEN mystream]
60 assert_equal [lindex $items 0 1] {item 1 value a}
61 assert_equal [lindex $items 1 1] {item 2 value b}
315assert_equal [r xrevrange teststream 1234567891245 -] {{1234567891240-0 {key2 value2}} {1234567891…
317assert_equal [r xrevrange teststream2 1234567891245 -] {{1234567891240-0 {key1 value2}} {123456789…
/f-stack/app/redis-5.0.5/tests/integration/
H A Dredis-cli.tcl8 assert_equal "redis> " [read_cli $fd]
126 assert_equal "bar" [r get key]
128 assert_equal " bar " [r get key]
130 assert_equal "\"bar\"" [r get key]
132 assert_equal "\tbar\t" [r get key]
140 assert_equal "bar" [r get key]
145 assert_equal "bar" [r get key]
167 assert_equal "foo\n" [r get key]
173 assert_equal "from file" [r get key]
178 assert_equal "bar" [r get key]
[all …]
H A Daof.tcl36 assert_equal 1 [is_alive $srv]
52 assert_equal 1 [is_alive $srv]
69 assert_equal 1 [is_alive $srv]
169 assert_equal 1 [is_alive $srv]
180 assert_equal "" [$client get bar]
193 assert_equal 1 [is_alive $srv]
203 assert_equal 1 [$client scard set]
217 assert_equal 1 [is_alive $srv]
227 assert_equal 1 [$client scard set]
240 assert_equal 1 [is_alive $srv]
[all …]
H A Dconvert-zipmap-hash-on-load.tcl10 assert_equal 2 [r hlen hash]
21 assert_equal 2 [r hlen hash]
32 assert_equal 2 [r hlen hash]
H A Daof-race.tcl27 assert_equal 20000 [$client get foo]
33 assert_equal 20000 [$client get foo]
H A Dblock-repl.tcl55 assert_equal [r debug digest] [r -1 debug digest]
H A Dreplication-2.tcl87 assert_equal [r debug digest] [r -1 debug digest]
/f-stack/app/redis-5.0.5/tests/unit/moduleapi/
H A Dcommandfilter.tcl59 assert_equal "{set mykey @log}" [r lrange log-key 0 -1]
74 assert_equal "{set mykey @log}" [r lrange log-key 0 -1]
78 assert_equal {} [r lrange log-key 0 -1]
81 assert_equal {} [r lrange log-key 0 -1]
/f-stack/app/redis-5.0.5/tests/support/
H A Dtest.tcl24 proc assert_equal {expected value {detail ""}} { procedure
47 assert_equal $type [r type $key]

12