1 // routine
2// bug before version 1.27 pb passage d'argument
3func int myfunction(real a1)
4{
5 int i=a1*a1/1;
6 return i;
7};
8func real myfunction(real a,real b)
9{
10 real z =myfunction(a)+b;
11 return z;
12};
13// appele
14cout << myfunction(1.0,3.) << " " << myfunction(1,3) << endl;
15