diff options
Diffstat (limited to 'contrib/perl5/t/lib/dprof/test2_t')
| -rw-r--r-- | contrib/perl5/t/lib/dprof/test2_t | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/contrib/perl5/t/lib/dprof/test2_t b/contrib/perl5/t/lib/dprof/test2_t new file mode 100644 index 0000000..edc46c5 --- /dev/null +++ b/contrib/perl5/t/lib/dprof/test2_t @@ -0,0 +1,21 @@ +sub foo { + print "in sub foo\n"; + bar(); +} + +sub bar { + print "in sub bar\n"; +} + +sub baz { + print "in sub baz\n"; + bar(); + bar(); + bar(); + foo(); +} + +bar(); +bar(); +baz(); +foo(); |
