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
Index: T n

⟦f35734a4a⟧ TextFile

    Length: 808 (0x328)
    Types: TextFile
    Names: »nreport.c«

Derivation

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

TextFile

#define D_NEWSVERBS
#define D_NWSSTR
#define D_FILES
#include        "empdef.h"

nreport(anum, verb, vnum)
short   anum, verb, vnum;
{
        register        i;
        long    now, lseek();

        time(&now);
X22:    
        i = read(newsf, &nws, sizeof(nws));
        if( i != sizeof(nws) ) goto X122;
        if( now - nws.nws_when <= 302400. ) goto X22; /*3.5 days=302400 sec*/
X122:   
        nws.nws_ano = anum;
        if( verb != N_WON_SECT ) goto X154;
        if( vnum != 0 ) goto X154;
        verb = N_TOOK_UNOCC;
X154:   
        nws.nws_vrb = verb;
        nws.nws_vno = vnum;
        nws.nws_ntm = ntime;
        time(&nws.nws_when);
        lseek(newsf, (long)(-i), 1);
        write(newsf, &nws, sizeof(nws));
        if( i != 0 ) return;
        lseek(newsf, 0L, 0);
        return;
}