mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 02:45:58 +02:00
* double del_reference removed
This commit is contained in:
parent
e4d44f4281
commit
1ef3c84bb8
@ -496,7 +496,8 @@ implementation
|
|||||||
begin
|
begin
|
||||||
{ we do not need destination anymore }
|
{ we do not need destination anymore }
|
||||||
del_reference(p^.left^.location.reference);
|
del_reference(p^.left^.location.reference);
|
||||||
del_reference(p^.right^.location.reference);
|
{del_reference(p^.right^.location.reference);
|
||||||
|
done in loadshortstring }
|
||||||
loadshortstring(p);
|
loadshortstring(p);
|
||||||
ungetiftemp(p^.right^.location.reference);
|
ungetiftemp(p^.right^.location.reference);
|
||||||
end;
|
end;
|
||||||
@ -985,7 +986,10 @@ implementation
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.85 1999-09-12 08:48:03 florian
|
Revision 1.86 1999-09-16 07:56:46 pierre
|
||||||
|
* double del_reference removed
|
||||||
|
|
||||||
|
Revision 1.85 1999/09/12 08:48:03 florian
|
||||||
* bugs 593 and 607 fixed
|
* bugs 593 and 607 fixed
|
||||||
* some other potential bugs with array constructors fixed
|
* some other potential bugs with array constructors fixed
|
||||||
* for classes compiled in $M+ and it's childs, the default access method
|
* for classes compiled in $M+ and it's childs, the default access method
|
||||||
|
Loading…
Reference in New Issue
Block a user