Get rid of src/lib/common/land.c
There are several files with land unit subroutines. This one is in an awkward place: it depends on stuff from ../subs, which contributes to libcommon.a's ugly dependencies. Move its contents to logical places (use internal linkage where possible), and remove it.
This commit is contained in:
parent
312e6d4c5b
commit
3d2518a724
5 changed files with 79 additions and 122 deletions
|
@ -53,6 +53,7 @@
|
|||
|
||||
static void lnd_mess(char *, struct ulist *);
|
||||
static int lnd_hit_mine(struct lndstr *, struct lchrstr *);
|
||||
static int has_helpful_engineer(coord, coord, natid);
|
||||
|
||||
double
|
||||
attack_val(int combat_mode, struct lndstr *lp)
|
||||
|
@ -1248,6 +1249,26 @@ lnd_fortify(struct lndstr *lp, int mob)
|
|||
return hard_amt;
|
||||
}
|
||||
|
||||
/*
|
||||
* Is there a engineer unit at X,Y that can help nation CN?
|
||||
*/
|
||||
static int
|
||||
has_helpful_engineer(coord x, coord y, natid cn)
|
||||
{
|
||||
struct nstr_item ni;
|
||||
struct lndstr land;
|
||||
|
||||
snxtitem_xy(&ni, EF_LAND, x, y);
|
||||
while (nxtitem(&ni, &land)) {
|
||||
if (land.lnd_own != cn && getrel(getnatp(land.lnd_own), cn) != ALLIED)
|
||||
continue;
|
||||
if (lchr[(int)land.lnd_type].l_flags & L_ENGINEER)
|
||||
return 1;
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
/*
|
||||
* Set LP's tech to TLEV along with everything else that depends on it.
|
||||
*/
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue