From 1ef3c84bb8ce3ab5378784630b71ec437f7aadf1 Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Thu, 16 Sep 1999 07:56:46 +0000
Subject: [PATCH]  * double del_reference removed

---
 compiler/cg386ld.pas | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/compiler/cg386ld.pas b/compiler/cg386ld.pas
index d411f6cfb1..652e301d23 100644
--- a/compiler/cg386ld.pas
+++ b/compiler/cg386ld.pas
@@ -496,7 +496,8 @@ implementation
                     begin
                        { we do not need destination anymore }
                        del_reference(p^.left^.location.reference);
-                       del_reference(p^.right^.location.reference);
+                       {del_reference(p^.right^.location.reference);
+                        done in loadshortstring }
                        loadshortstring(p);
                        ungetiftemp(p^.right^.location.reference);
                     end;
@@ -985,7 +986,10 @@ implementation
 end.
 {
   $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
     * some other potential bugs with array constructors fixed
     * for classes compiled in $M+ and it's childs, the default access method