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

⟦6e30324f2⟧ TextFile

    Length: 444 (0x1bc)
    Types: TextFile
    Names: »getbit.c«

Derivation

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

TextFile

getbit(bit, bitmap)
int     bit, bitmap[];
{

        return((1 << (bit&017)) & bitmap[(bit>>4) & 01777]);
}

setbit(bit, bitmap, value)
int     bit, bitmap[], value;
{
        register int    i, b, *bp;

        bp = &bitmap[(bit>>4) & 01777];
        b = bit;
        b &= 017;
        i = value;
        i <<= b;
        if( i != 0 ) {
                *bp |= i;
        } else {
                *bp &= ~(1 << b);
        }
        return;
}