Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
ruanhaishen
redis
Commits
5b12b47d
Commit
5b12b47d
authored
Oct 15, 2010
by
Pieter Noordhuis
Browse files
Show output of leaks command on a leak
parent
00cf82c0
Changes
1
Show whitespace changes
Inline
Side-by-side
tests/support/test.tcl
View file @
5b12b47d
...
@@ -90,8 +90,10 @@ proc test {name code {okpattern notspecified}} {
...
@@ -90,8 +90,10 @@ proc test {name code {okpattern notspecified}} {
}
}
}
}
if
{
$::traceleaks
}
{
if
{
$::traceleaks
}
{
if
{
!
[
string match
{
*0 leaks*
}
[
exec leaks redis-server
]]}
{
set output
[
exec leaks redis-server
]
if
{
!
[
string match
{
*0 leaks*
}
$output
]}
{
puts
"--------- Test
$::testnum
LEAKED! --------"
puts
"--------- Test
$::testnum
LEAKED! --------"
puts $output
exit 1
exit 1
}
}
}
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment