mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-11 21:29:42 +02:00
* typecanbeforward wasn't always restored in object_dec which
sometimes caused strange effects
This commit is contained in:
parent
cb0660deaa
commit
706eedfedd
@ -1149,6 +1149,7 @@ unit pdecl;
|
|||||||
Message(type_e_class_type_expected);
|
Message(type_e_class_type_expected);
|
||||||
object_dec:=new(perrordef,init);
|
object_dec:=new(perrordef,init);
|
||||||
end;
|
end;
|
||||||
|
typecanbeforward:=storetypeforwardsallowed;
|
||||||
exit;
|
exit;
|
||||||
end
|
end
|
||||||
{ forward class }
|
{ forward class }
|
||||||
@ -1172,6 +1173,7 @@ unit pdecl;
|
|||||||
aktclass^.insertvmt;
|
aktclass^.insertvmt;
|
||||||
|
|
||||||
object_dec:=aktclass;
|
object_dec:=aktclass;
|
||||||
|
typecanbeforward:=storetypeforwardsallowed;
|
||||||
exit;
|
exit;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
@ -2216,7 +2218,11 @@ unit pdecl;
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.102 1999-03-05 01:14:26 pierre
|
Revision 1.103 1999-03-22 22:10:25 florian
|
||||||
|
* typecanbeforward wasn't always restored in object_dec which
|
||||||
|
sometimes caused strange effects
|
||||||
|
|
||||||
|
Revision 1.102 1999/03/05 01:14:26 pierre
|
||||||
* bug0198 : call conventions for methods
|
* bug0198 : call conventions for methods
|
||||||
not yet implemented is the control of same calling convention
|
not yet implemented is the control of same calling convention
|
||||||
for virtual and child's virtual
|
for virtual and child's virtual
|
||||||
|
Loading…
Reference in New Issue
Block a user