Browse Source

- remove my last stupid commit (Thanks, Peter!)

carl 23 years ago
parent
commit
4595fb4663
1 changed files with 4 additions and 3 deletions
  1. 4 3
      compiler/systems/t_win32.pas

+ 4 - 3
compiler/systems/t_win32.pas

@@ -166,7 +166,6 @@ const
               hp1:=timportlist.create(hs);
               hp1:=timportlist.create(hs);
               current_module.imports.concat(hp1);
               current_module.imports.concat(hp1);
            end;
            end;
-         WriteLn('importing func ',func);
          { search for reuse of old import item }
          { search for reuse of old import item }
          hp2:=twin32imported_item(hp1.imported_items.first);
          hp2:=twin32imported_item(hp1.imported_items.first);
          while assigned(hp2) do
          while assigned(hp2) do
@@ -177,7 +176,6 @@ const
           end;
           end;
          if not assigned(hp2) then
          if not assigned(hp2) then
           begin
           begin
-            WriteLn('Adding new entry...func,name',func,' ',name);
             hp2:=twin32imported_item.create(func,name,index);
             hp2:=twin32imported_item.create(func,name,index);
             hp2.procdef:=aprocdef;
             hp2.procdef:=aprocdef;
             hp1.imported_items.concat(hp2);
             hp1.imported_items.concat(hp2);
@@ -1615,7 +1613,10 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.5  2002-11-16 14:46:50  carl
+  Revision 1.6  2002-11-16 18:40:38  carl
+    - remove my last stupid commit (Thanks, Peter!)
+
+  Revision 1.5  2002/11/16 14:46:50  carl
     * don't add debug information in not in debug mode
     * don't add debug information in not in debug mode
 
 
   Revision 1.4  2002/11/15 01:59:02  peter
   Revision 1.4  2002/11/15 01:59:02  peter