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

1.1     ! root        1: ...
        !             2: 
        !             3: %{
        !             4: /*    DEBUG */
        !             5: 
        !             6: #ifdef  DEBUG
        !             7: testdebug (pe, s)
        !             8: register PE pe;
        !             9: register char *s;
        !            10: {
        !            11:     static int  debug = OK;
        !            12:     char   *cp;
        !            13:     register PS     ps;
        !            14: 
        !            15:     switch (debug) {
        !            16:        case NOTOK: 
        !            17:            break;
        !            18: 
        !            19:        case OK: 
        !            20:            if ((debug = (cp = getenv ("PEPYDEBUG")) && *cp ? atoi (cp)
        !            21:                        : NOTOK) == NOTOK)
        !            22:                break;
        !            23:            fprintf (stderr, "%s made with %s\n", myname, pepyid);
        !            24: 
        !            25:        default: 
        !            26:            fprintf (stderr, "%s\n", s);
        !            27: 
        !            28:            if ((ps = ps_alloc (std_open)) == NULLPS)
        !            29:                return;
        !            30:            if (std_setup (ps, stderr) != NOTOK)
        !            31:                (void) pe2pl (ps, pe);
        !            32:            fprintf (stderr, "--------\n");
        !            33:            ps_free (ps);
        !            34:            break;
        !            35:     }
        !            36: }
        !            37: #endif
        !            38: 
        !            39: ...

unix.superglobalmegacorp.com

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