DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦f94510f0a⟧ TextFile

    Length: 297 (0x129)
    Types: TextFile
    Names: »dist.c«

Derivation

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Empire/dist.c«

TextFile

#include "c_common.h"

/*
 * This subroutine sets ar2s so that the army won't get
 * off the troop transport prematurely
 */ 
dist_(z6, ila)
	int	*z6, *ila;
{
	int	id, l;

	id = 2 * idist_(z6, ila) + 1;
	for (l = IAR2; l < limit_[9] + IAR2; l++)
		if (rlmap_[l] == *z6)
			ar2s_[l - IAR2] = id;
}