eliminated a lot of hints and warnings

[lcore.git] / lcoreselect.pas

diff --git a/lcoreselect.pas b/lcoreselect.pas
index 659bfce58d8daf099acc0f7cab9fa888271fedd5..38da6ba29a2384ea3d56f8f0b9e4f37a2509af83 100755 (executable)
--- a/lcoreselect.pas
+++ b/lcoreselect.pas
@@ -64,7 +64,7 @@ type
 \r
 procedure processtimers;inline;\r
 var\r
 \r
 procedure processtimers;inline;\r
 var\r

-  tv           ,tvnow     : ttimeval ;\r
+  tvnow     : ttimeval ;\r

   currenttimer            : tltimer   ;\r
   temptimer               : tltimer  ;\r
 \r
   currenttimer            : tltimer   ;\r
   temptimer               : tltimer  ;\r
 \r


@@ -90,7 +90,6 @@ end;
 procedure processasios(var fdsr,fdsw:fdset);//inline;\r
 var\r
   currentsocket : tlasio  ;\r
 procedure processasios(var fdsr,fdsw:fdset);//inline;\r
 var\r
   currentsocket : tlasio  ;\r

-  tempsocket    : tlasio  ;\r

   socketcount   : integer ; // for debugging perposes :)\r
   dw,bt:integer;\r
   currentfdword:fdword;\r
   socketcount   : integer ; // for debugging perposes :)\r
   dw,bt:integer;\r
   currentfdword:fdword;\r