1N/A# Test that dprof doesn't break
1N/A# &bar; used as &bar(@_);
1N/A
1N/Asub foo1 {
1N/A print "in foo1(@_)\n";
1N/A bar(@_);
1N/A}
1N/Asub foo2 {
1N/A print "in foo2(@_)\n";
1N/A &bar;
1N/A}
1N/Asub bar {
1N/A print "in bar(@_)\n";
1N/A if( @_ > 0 ){
1N/A &yeppers;
1N/A }
1N/A}
1N/Asub yeppers {
1N/A print "rest easy\n";
1N/A}
1N/A
1N/A
1N/A&foo1( A );
1N/A&foo2( B );
1N/A