anchor.diff:  //Check if specific woodcutters are in Fell only mode
   procedure TKMCityManagement.CheckMarketplaces();
   var
  -  RequiedCnt, AvaiableCnt: Word;
  -  RequiredWares, AvaiableWares: array of TKMWareType;
  +  RequiedCnt, AvailableCnt: Word;
  +  RequiredWares, AvailableWares: array of TKMWareType;
     procedure AddWare(aWare: TKMWareType; IsRequired: Boolean = True);
     begin
       if IsRequired then
  
positive.code:   for GT := Low(TKMGroupType) to High(TKMGroupType) do
      ComputeGroupDemands(GT, IronRatio);
  
    // Make sure that we always produce something
    Sum := 0;
    for UT := Low(fWarriorsDemands) to High(fWarriorsDemands) do
      Sum := Sum + fWarriorsDemands[UT];
    if (Sum < 20) then
      CheckMinArmyReq();
  
    // Get weapons reserves
    for WT := Low(Warfare) to High(Warfare) do
    begin
      Warfare[WT].Avaiable := gHands[fOwner].Stats.GetWareBalance(WT);
      Warfare[WT].Required := 0;
    end;
  
    // Get count of needed weapons
  
negative.code:     end
      else
      begin
        AvailableWares[AvailableCnt] := aWare;
        AvailableCnt := AvailableCnt + 1;
      end;
    end;
  
  