From a4086f7dde731cb0cf7a7478981a52191a75c401 Mon Sep 17 00:00:00 2001
From: daniel <daniel@freepascal.org>
Date: Fri, 9 Jan 2004 13:37:17 +0000
Subject: [PATCH]   * Commented out code removed

---
 compiler/systems/t_win32.pas | 31 ++-----------------------------
 1 file changed, 2 insertions(+), 29 deletions(-)

diff --git a/compiler/systems/t_win32.pas b/compiler/systems/t_win32.pas
index 7ef1241151..0693ed2c7a 100644
--- a/compiler/systems/t_win32.pas
+++ b/compiler/systems/t_win32.pas
@@ -629,18 +629,6 @@ const
               end;
             current_module._exports.insertbefore(hp,hp2);
           end;
-{        if hp2=texported_item(current_module._exports.first) then
-          current_module._exports.concat(hp)
-        else if assigned(hp2) then
-          begin
-             hp.next:=hp2;
-             hp.previous:=hp2.previous;
-             if assigned(hp2.previous) then
-               hp2.previous.next:=hp;
-             hp2.previous:=hp;
-          end
-        else
-          current_module._exports.concat(hp);}
       end;
 
 
@@ -768,21 +756,6 @@ const
                 temtexport.concat(hp)
               else
                 temtexport.insertbefore(hp,hp2);
-{              if hp2=texported_item(temtexport.first) then
-                 temtexport.insert(hp)
-              else
-                begin
-                   if assigned(hp2) then
-                     begin
-                        hp.next:=hp2;
-                        hp.previous:=hp2.previous;
-                        hp2.previous:=hp;
-                        if assigned(hp.previous) then
-                          hp.previous.next:=hp;
-                      end
-                    else
-                      temtexport.concat(hp);
-                end;}
               hp:=texported_item(current_module._exports.first);;
            end;
 
@@ -1630,8 +1603,8 @@ initialization
 end.
 {
   $Log$
-  Revision 1.26  2004-01-09 13:36:26  daniel
-    * Export table generation fixed according to instructions from Pierre
+  Revision 1.27  2004-01-09 13:37:17  daniel
+    * Commented out code removed
 
   Revision 1.25  2003/12/09 19:54:59  marco
    * base-file instead of base_file