anchor.diff:      fLog.AssertToLog(false,'Dec doorway when not in use?');
       exit;
     end;
  -  dec(fHouse.DoorwayUse);
  +  if fHouse<>nil then dec(fHouse.DoorwayUse);
     fUsedDoorway := false;
   end;
   
  
positive.code:     fLog.AssertToLog(false,'Inc doorway when already in use?');
      exit;
    end;
    inc(fHouse.DoorwayUse);
    fUsedDoorway := true;
  end;
  
  
negative.code: destructor TUnitActionGoInOut.Destroy;
  begin
    if fUsedDoorway then DecDoorway;
    if fHouse<>nil then fPlayers.CleanUpHousePointer(fHouse);
    Inherited;
  end;
  
  