Return to 0.graph.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.bin / struct

Annotation of 42BSD/usr.bin/struct/0.graph.c, revision 1.1

1.1     ! root        1: #ifndef lint
        !             2: static char sccsid[] = "@(#)0.graph.c  4.1     (Berkeley)      2/11/83";
        !             3: #endif not lint
        !             4: 
        !             5: #include <stdio.h>
        !             6: #include "def.h"
        !             7: 
        !             8: #define TABOVER(n)     tabover(n,stderr)
        !             9: prgraph()
        !            10:        {
        !            11:        VERT v;
        !            12:        int i;
        !            13:        if (progress) fprintf(stderr,"prgraph():\n");
        !            14:        for (v = 0; v < nodenum; ++v)
        !            15:                {
        !            16:                fprintf(stderr,"%d %s:",v, typename[NTYPE(v)]);
        !            17:                for (i = 0; i < ARCNUM(v); ++i)
        !            18:                        {
        !            19:                        printf("%d ",ARC(v,i));
        !            20:                        ASSERT(UNDEFINED <= ARC(v,i) && ARC(v,i) < nodenum, prgraph);
        !            21:                        }
        !            22:                printf("\n");
        !            23:                }
        !            24:        printf("\n\n");
        !            25:        }
        !            26: 
        !            27: prtree()
        !            28:        {
        !            29:        prtr(START,1);
        !            30:        }
        !            31: 
        !            32: prtr(v,tab)            /* print tree in form of program indenting by tab */
        !            33: VERT v;
        !            34: int tab;
        !            35:        {
        !            36:        int i;
        !            37:        TABOVER(tab);
        !            38:        fprintf(stderr,"%d %s:",v,typename[NTYPE(v)]);
        !            39:        for (i = 0; i < ARCNUM(v); ++i)
        !            40:                fprintf(stderr," %d",ARC(v,i));
        !            41:        printf("\n");
        !            42:        for (i = 0; i < CHILDNUM(v); ++i)
        !            43:                {
        !            44:                TABOVER(tab+1);
        !            45:                fprintf(stderr,"{\n");
        !            46:                if (DEFINED(LCHILD(v,i)))
        !            47:                        prtr(LCHILD(v,i),tab+1);
        !            48:                TABOVER(tab+1);
        !            49:                fprintf(stderr,"}\n");
        !            50:                }
        !            51:        if (DEFINED(RSIB(v)))
        !            52:                prtr(RSIB(v),tab);
        !            53:        }
        !            54: 
        !            55: 
        !            56: tabover(n,fd)          /* tab n times */
        !            57: int n;
        !            58: FILE *fd;
        !            59:        {
        !            60:        int i;
        !            61:        for (i = 0; i < n; ++i)
        !            62:                putc('\t',fd);
        !            63:        }

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