locks in TimerThread::run, colorful all thread backtrace info if corefile generated, testcase for removeTimerUser
parent
e7e383fd7f
commit
c21f3560f9
@ -0,0 +1,35 @@
|
|||||||
|
#!/usr/bin/perl
|
||||||
|
|
||||||
|
use Term::ANSIColor qw(:constants);
|
||||||
|
$Term::ANSIColor::AUTORESET = 1;
|
||||||
|
|
||||||
|
|
||||||
|
while ( <> ) {
|
||||||
|
|
||||||
|
if (/^(Thread \d+)/) {
|
||||||
|
print "\n" . BOLD BLUE . $1 . RESET . " $'"
|
||||||
|
}
|
||||||
|
elsif ( /^(#\d+)\s+(\S+)\s+in\s+(.+)( \(.*)(at.*\/)(\S+):(\d+)/ )
|
||||||
|
{
|
||||||
|
print "\n" .
|
||||||
|
BOLD . $1 . # no
|
||||||
|
RESET . " $2 in " . # mem in
|
||||||
|
GREEN . $3 . # function
|
||||||
|
RESET . " $4\n$5" . # args, path
|
||||||
|
BOLD CYAN . "$6" . # filename
|
||||||
|
RESET . ":" .
|
||||||
|
YELLOW . $7 . # line
|
||||||
|
RESET . "\n";
|
||||||
|
}
|
||||||
|
elsif ( /^(#\d+)\s+(\S+)\s+in\s+(.+)( \(.*)(from.*\/)(\S+)/ )
|
||||||
|
{
|
||||||
|
print "\n" .
|
||||||
|
BOLD . $1 . # no
|
||||||
|
RESET . " $2 in " . # mem in
|
||||||
|
GREEN . $3 . # function
|
||||||
|
RESET . " $4\n$5" . # args, path
|
||||||
|
BLUE . "$6" . # filename
|
||||||
|
RESET . "\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
Loading…
Reference in new issue