anchor.diff:        begin
           Locs.SortByTag();
           BestBid := INIT_BID;
  +        BestIdx := 0; // For compiler
           for I := Locs.Count-1 downto 0 do
             if gAIFields.Eye.CanAddHousePlan(Locs.Items[I], ht_CoalMine, True, False, False) then
             begin
  
positive.code: destructor TKMCityPlanner.Destroy();
  var
    HT: TKMHouseType;
    I, K, Len: Integer;
  begin
    for HT := HOUSE_MIN to HOUSE_MAX do
      for I := 0 to fPlannedHouses[HT].Count - 1 do
  
negative.code:   Output: Boolean;
    I, BestIdx: Integer;
    Bid, BestBid: Single;
  begin
    Output := False;
    BestBid := MAX_BID;
    BestIdx := 0; // For compiler
    for I := fPlannedHouses[aHT].Count - 1 downto 0 do
      with fPlannedHouses[aHT].Plans[I] do
        if not Placed then
  