Testing/General/test-3.p


1
2
3
4
5
6
7
8
9
10

program main( input, output );
 var a,b,c: integer;
 function foo( x,y: integer ): integer;
 begin
	foo := x + foo( x, y )
 end;
begin
 a := foo( b, c )
end.