Removed left-over comments from TStepCounter

solvers/UStepCounter.pas

@@ -112,7 +112,6 @@ var
   currentStep: Integer;
   currentPlots, nextPlots, temp: TPoints;
   plot, direction, next: TPoint;
-  //s: string;
 begin
   FWidth := Length(FLines[0]);
   FHeight := FLines.Count;
@@ -144,15 +143,7 @@ begin
 
     // Positions where the number of steps are even can be reached with trivial backtracking, so they count.
     if currentStep mod 2 = 0 then
-    //begin
       Inc(FPart1, currentPlots.Count);
-    //  for plot in currentPlots do
-    //    SetPosition(plot, 'O');
-    //end;
-
-    //for s in FLines do
-    //  WriteLn(s);
-    //WriteLn;
   end;
 
   currentPlots.Free;