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

⟦0ec76810e⟧ TextFile

    Length: 428 (0x1ac)
    Types: TextFile
    Names: »getloan.c«

Derivation

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

TextFile

#define D_LONSTR
#define D_FILES
#include        "empdef.h"

getloan(i)
int     i;
{
        long    lseek();

        if( lseek(loanf, (long)i * (sizeof loan), 0) == -1L ||
             read(loanf, &loan, (sizeof loan)) != (sizeof loan) ) return(-1);
        return(0);
}

putloan(i)
int     i;
{
        long    lseek();

        lseek(loanf, (long)i * (sizeof loan), 0);
        return(write(loanf, &loan, (sizeof loan)));
}