gvsafronov/futriix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Show output of leaks command on a leak

Browse Source
This commit is contained in:
Pieter Noordhuis 2010-10-15 15:56:16 +02:00
parent a2459dd4e7
commit 4865ad620b
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tests/support/test.tcl
View File

@ -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
} }
} }