blob: 0fdb7ea866843af75414edcebb55cc877a6daac7 (
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
|
/*
* Written by Alan Burlinson -- taken from his blog post
* at <http://bleaklow.com/2005/09/09/dtrace_and_perl.html>.
*/
provider perl {
probe sub__entry(const char *, const char *, int, const char *);
probe sub__return(const char *, const char *, int, const char *);
probe phase__change(const char *, const char *);
probe op__entry(const char *);
probe loading__file(const char *);
probe loaded__file(const char *);
};
/*
* Local Variables:
* tab-width: 4
* indent-tabs-mode: nil
* End:
*
* ex: set ts=8 sts=4 sw=4 et:
*/
|
