empire/empserver
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(s_commod): Clarify and comment the trickery required to make the

Browse source 
recursion work.  By the way, resuppling from supply units in unit id
order is a greedy algorithm, which is quite inappropriate for the
problem.
This commit is contained in:
Markus Armbruster 2004-03-05 16:30:30 +00:00
parent e6ffdb71ee
commit d35085e5c4
1 changed files with 15 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

24
src/lib/subs/supply.c
View file

@ -390,22 +390,28 @@ s_commod(int own, int x, int y, int type, int total_wanted,
if ((vec[type] - wanted) < get_minimum(&land, type)) {
int hold;
struct lndstr l2;
struct lndstr save;
l2 = land;
/*
* Temporarily zap this unit's store, so the recursion
* avoids it.
*/
save = land;
hold = vec[type];
vec[type] = 0;
putvec(VT_ITEM, vec, (s_char *)&land, EF_LAND);
land.lnd_fuel = 0;
putland(land.lnd_uid, &land);
hold +=
s_commod(own, land.lnd_x, land.lnd_y, type, wanted,
actually_doit);
hold += s_commod(own, land.lnd_x, land.lnd_y, type, wanted,
actually_doit);
vec[type] = hold;
putvec(VT_ITEM, vec, (s_char *)&land, EF_LAND);
putland(land.lnd_uid, &land);
if (!actually_doit)
putland(l2.lnd_uid, &l2);
if (actually_doit) {
putvec(VT_ITEM, vec, (s_char *)&land, EF_LAND);
putland(land.lnd_uid, &land);
} else
putland(save.lnd_uid, &save);
}
getvec(VT_ITEM, vec, (s_char *)&land, EF_LAND);