mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 17:29:33 +02:00
* constructors don't return in parameter
This commit is contained in:
parent
b19edee1d4
commit
9a1925980c
@ -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
|
||||||
|
Loading…
Reference in New Issue
Block a user