#13 Error when a local function returns a record

[MSC]

Type Record_Type = Record ... end;

Operation F(X: Record_Type): Record_Type;
...
Procedure
end F;