test5_t revision 7c478bd95313f5f23a4c958a745db2134aa03244
# Test that dprof doesn't break
# &bar; used as &bar(@_);
sub foo1 {
print "in foo1(@_)\n";
bar(@_);
}
sub foo2 {
print "in foo2(@_)\n";
&bar;
}
sub bar {
print "in bar(@_)\n";
if( @_ > 0 ){
&yeppers;
}
}
sub yeppers {
print "rest easy\n";
}
&foo1( A );
&foo2( B );