Return to grind4-6b.py CVS log

Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / doc / manual

Annotation of 43BSDReno/contrib/isode-beta/doc/manual/grind4-6b.py, revision 1.1

1.1     ! root        1: ...
        !             2: 
        !             3: /*    MAIN */
        !             4: 
        !             5: /* ARGSUSED */
        !             6: 
        !             7: main (argc, argv, envp)
        !             8: int    argc;
        !             9: char  **argv,
        !            10:       **envp;
        !            11: {
        !            12:     PE     pe;
        !            13:     PS     ps;
        !            14: 
        !            15:     myname = *argv;
        !            16:     if ((ps = ps_alloc (std_open)) == NULLPS)
        !            17:        adios (NULLCP, "ps_alloc loses");
        !            18:     if (std_setup (ps, stdin) == NOTOK)
        !            19:        ps_adios (ps, "std_setup");
        !            20: 
        !            21:     for (;;) {
        !            22:        if ((pe = ps2pe (ps)) == NULLPE)
        !            23:            if (ps -> ps_errno)
        !            24:                ps_adios (ps, "ps2pe");
        !            25:            else
        !            26:                break;
        !            27: 
        !            28:        (void) parse_PERSONNEL_PersonnelRecord (pe, 1, NULLIP, NULLVP,
        !            29:                    NULLCP);
        !            30: 
        !            31:        pe_free (pe);
        !            32:     }
        !            33: 
        !            34:     ps_free (ps);
        !            35: 
        !            36:     exit (0);
        !            37: }
        !            38: 
        !            39: %}
        !            40: 
        !            41: ...

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.