[p5sagit/p5-mst-13.2.git] / t / lib / dprof / test4_t

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();

eval { fork };

bar();
baz();
foo();
Commit	Line	Data
583a019e	1	sub foo {
	2	print "in sub foo\n";
	3	bar();
	4	}
	5
	6	sub bar {
	7	print "in sub bar\n";
	8	}
	9
	10	sub baz {
	11	print "in sub baz\n";
	12	bar();
	13	bar();
	14	bar();
	15	foo();
	16	}
	17
	18	bar();
	19
95667ae4	20	eval { fork };
583a019e	21
	22	bar();
	23	baz();
	24	foo();