1N/Asub foo {
1N/A print "in sub foo\n";
1N/A bar();
1N/A}
1N/A
1N/Asub bar {
1N/A print "in sub bar\n";
1N/A}
1N/A
1N/Asub baz {
1N/A print "in sub baz\n";
1N/A bar();
1N/A bar();
1N/A bar();
1N/A foo();
1N/A}
1N/A
1N/Abar();
1N/A
1N/Aeval { fork };
1N/A
1N/Abar();
1N/Abaz();
1N/Afoo();