Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
别团等shy哥发育
redis
提交
93959bc0
R
redis
项目概览
别团等shy哥发育
/
redis
与 Fork 源项目一致
从无法访问的项目Fork
通知
2
Star
0
Fork
0
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
R
redis
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
93959bc0
编写于
3月 30, 2015
作者:
A
antirez
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
Sentinel / Cluster test: exit with non-zero error code on failures.
上级
2e92d0f0
变更
3
隐藏空白更改
内联
并排
Showing
3 changed file
with
16 addition
and
0 deletion
+16
-0
tests/cluster/run.tcl
tests/cluster/run.tcl
+1
-0
tests/instances.tcl
tests/instances.tcl
+14
-0
tests/sentinel/run.tcl
tests/sentinel/run.tcl
+1
-0
未找到文件。
tests/cluster/run.tcl
浏览文件 @
93959bc0
...
@@ -17,6 +17,7 @@ proc main {} {
...
@@ -17,6 +17,7 @@ proc main {} {
}
}
run_tests
run_tests
cleanup
cleanup
end_tests
}
}
if
{[
catch main e
]}
{
if
{[
catch main e
]}
{
...
...
tests/instances.tcl
浏览文件 @
93959bc0
...
@@ -19,6 +19,7 @@ set ::verbose 0
...
@@ -19,6 +19,7 @@ set ::verbose 0
set ::valgrind 0
set ::valgrind 0
set ::pause_on_error 0
set ::pause_on_error 0
set ::simulate_error 0
set ::simulate_error 0
set ::failed 0
set ::sentinel_instances
{}
set ::sentinel_instances
{}
set ::redis_instances
{}
set ::redis_instances
{}
set ::sentinel_base_port 20000
set ::sentinel_base_port 20000
...
@@ -231,6 +232,7 @@ proc test {descr code} {
...
@@ -231,6 +232,7 @@ proc test {descr code} {
flush stdout
flush stdout
if
{[
catch
{
set retval
[
uplevel 1 $code
]}
error
]}
{
if
{[
catch
{
set retval
[
uplevel 1 $code
]}
error
]}
{
incr ::failed
if
{[
string match
"assertion:*"
$error
]}
{
if
{[
string match
"assertion:*"
$error
]}
{
set msg
[
string range $error 10 end
]
set msg
[
string range $error 10 end
]
puts
[
colorstr red $msg
]
puts
[
colorstr red $msg
]
...
@@ -246,6 +248,7 @@ proc test {descr code} {
...
@@ -246,6 +248,7 @@ proc test {descr code} {
}
}
}
}
# Execute all the units inside the 'tests' directory.
proc run_tests
{}
{
proc run_tests
{}
{
set tests
[
lsort
[
glob ../tests/*
]]
set tests
[
lsort
[
glob ../tests/*
]]
foreach test $tests
{
foreach test $tests
{
...
@@ -258,6 +261,17 @@ proc run_tests {} {
...
@@ -258,6 +261,17 @@ proc run_tests {} {
}
}
}
}
# Print a message and exists with 0 / 1 according to zero or more failures.
proc end_tests
{}
{
if
{
$::failed
== 0
}
{
puts
"GOOD! No errors."
exit 0
}
else
{
puts
"WARNING
$::failed
tests faield."
exit 1
}
}
# The
"S"
command is used to interact with the N-th Sentinel.
# The
"S"
command is used to interact with the N-th Sentinel.
# The general form is:
# The general form is:
#
#
...
...
tests/sentinel/run.tcl
浏览文件 @
93959bc0
...
@@ -13,6 +13,7 @@ proc main {} {
...
@@ -13,6 +13,7 @@ proc main {} {
spawn_instance redis $::redis_base_port $::instances_count
spawn_instance redis $::redis_base_port $::instances_count
run_tests
run_tests
cleanup
cleanup
end_tests
}
}
if
{[
catch main e
]}
{
if
{[
catch main e
]}
{
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录