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 g

⟦066d4502e⟧ TextFile

    Length: 569 (0x239)
    Types: TextFile
    Names: »grind4-6b.py«

Derivation

└─⟦3d0c2be1b⟧ Bits:30001254 ISODE-5.0 Tape
    └─⟦eba4602b1⟧ »./isode-5.0.tar.Z« 
        └─⟦d3ac74d73⟧ 
            └─⟦this⟧ »isode-5.0/doc/manual/grind4-6b.py« 
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
    └─⟦35176feda⟧ »EurOpenD22/isode/isode-6.tar.Z« 
        └─⟦de7628f85⟧ 
            └─⟦this⟧ »isode-6.0/doc/manual/grind4-6b.py«

TextFile

...

/* \f

   MAIN */

/* ARGSUSED */

main (argc, argv, envp)
int	argc;
char  **argv,
      **envp;
{
    PE	    pe;
    PS	    ps;

    myname = *argv;
    if ((ps = ps_alloc (std_open)) == NULLPS)
	adios (NULLCP, "ps_alloc loses");
    if (std_setup (ps, stdin) == NOTOK)
	ps_adios (ps, "std_setup");

    for (;;) {
	if ((pe = ps2pe (ps)) == NULLPE)
	    if (ps -> ps_errno)
		ps_adios (ps, "ps2pe");
	    else
		break;

	(void) parse_PERSONNEL_PersonnelRecord (pe, 1, NULLIP, NULLVP,
		    NULLCP);

	pe_free (pe);
    }

    ps_free (ps);

    exit (0);
}

%}

...