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

⟦21879f313⟧ TextFile

    Length: 261 (0x105)
    Types: TextFile
    Names: »citfnd.c«

Derivation

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

TextFile

#include "c_common.h"

/*
 * FIND CITY AT LOCATION Z6, RETURN INDEX INTO X()
 */
citfnd_(z6)
	int	*z6;
{
	int	i, three = 3;

	for (i = 0; i < 70; i++)
		if (x_[i] == *z6)
			return (i+1);
	if (pass_)
		topmsg_(&three, "Citfnd error, get help!");
	return (0);
}