* constructors don't return in parameter

This commit is contained in:
peter 2004-06-29 20:56:46 +00:00
parent b19edee1d4
commit 9a1925980c

View File

@ -484,7 +484,8 @@ implementation
cgsize:=resultloc.size; cgsize:=resultloc.size;
{ structured results are easy to handle.... { structured results are easy to handle....
needed also when result_no_used !! } needed also when result_no_used !! }
if paramanager.ret_in_param(resulttype.def,procdefinition.proccalloption) then if (procdefinition.proctypeoption<>potype_constructor) and
paramanager.ret_in_param(resulttype.def,procdefinition.proccalloption) then
begin begin
{ Location should be setup by the funcret para } { Location should be setup by the funcret para }
if location.loc<>LOC_REFERENCE then if location.loc<>LOC_REFERENCE then
@ -1226,7 +1227,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.169 2004-06-20 08:55:29 florian Revision 1.170 2004-06-29 20:56:46 peter
* constructors don't return in parameter
Revision 1.169 2004/06/20 08:55:29 florian
* logs truncated * logs truncated
Revision 1.168 2004/06/16 20:07:08 florian Revision 1.168 2004/06/16 20:07:08 florian