X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/44dc132f5dc6ced75e4225826b4eb0dda63392ab..f0a6e6591b3d306641b78dfed4a4066935e82096:/lcoreselect.pas

diff --git a/lcoreselect.pas b/lcoreselect.pas
index 659bfce..38da6ba 100755
--- a/lcoreselect.pas
+++ b/lcoreselect.pas
@@ -64,7 +64,7 @@ type
 
 procedure processtimers;inline;
 var
-  tv           ,tvnow     : ttimeval ;
+  tvnow     : ttimeval ;
   currenttimer            : tltimer   ;
   temptimer               : tltimer  ;
 
@@ -90,7 +90,6 @@ end;
 procedure processasios(var fdsr,fdsw:fdset);//inline;
 var
   currentsocket : tlasio  ;
-  tempsocket    : tlasio  ;
   socketcount   : integer ; // for debugging perposes :)
   dw,bt:integer;
   currentfdword:fdword;