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

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.