module test1 implementation;
procedure mt1 (str:string);
begin
writeln (str);
end;
function mt2 (str:string):string;
begin
mt2:=str;
end;
end.
this file doesn't compile. GPC tells that mt2 redeclaration doesn't match
the first one.
The funny thing is that if I add
type mystr=string
after the "export" line and then change the function to use mystr -
everything compile.
Nick