blob: 2f16e41d9610e9026fbb7e7ba2c666e28845ae1f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
/*
* This software is in the public domain.
*
* $Id: tree.d 10510 2005-08-15 01:46:19Z kateturner $
*/
#pragma D option quiet
self int indent;
self int times[int];
php$target:::function-entry
{
@counts[copyinstr(arg0)] = count();
printf("%*s", self->indent, "");
printf("-> %s\n", copyinstr(arg0));
self->times[self->indent] = timestamp;
self->indent += 2;
}
php$target:::function-return
{
self->indent -= 2;
printf("%*s", self->indent, "");
printf("<- %s %dus\n", copyinstr(arg0), (timestamp - self->times[self->indent]) / 1000);
}
|