Return to job.c CVS log

Up to [Research Unix] / researchv10no / cmd / mk / src

Annotation of researchv10no/cmd/mk/src/job.c, revision 1.1.1.1

1.1       root        1: #include       "mk.h"
                      2: 
                      3: Job *
                      4: newjob(r, nlist, stem, match, pre, npre, tar, atar)
                      5:        Rule *r;
                      6:        Node *nlist;
                      7:        char *stem;
                      8:        regsubexp *match;
                      9:        Word *pre, *npre, *tar, *atar;
                     10: {
                     11:        register Job *j;
                     12: 
                     13:        j = (Job *)Malloc(sizeof(Job));
                     14:        j->r = r;
                     15:        j->n = nlist;
                     16:        j->stem = stem;
                     17:        j->match = match;
                     18:        j->p = pre;
                     19:        j->np = npre;
                     20:        j->t = tar;
                     21:        j->at = atar;
                     22:        j->nproc = -1;
                     23:        j->fd = -1;
                     24:        j->next = 0;
                     25:        return(j);
                     26: }
                     27: 
                     28: dumpj(s, j, all)
                     29:        char *s;
                     30:        Job *j;
                     31: {
                     32:        Fprint(1, "%s\n", s);
                     33:        while(j){
                     34:                Fprint(1, "job@%ld: r=%ld n=%ld stem='%s' nproc=%d\n",
                     35:                        j, j->r, j->n, j->stem, j->nproc);
                     36:                Fprint(1, "\ttarget='%s' alltarget='%s' prereq='%s' nprereq='%s'\n",
                     37:                        wtos(j->t), wtos(j->at), wtos(j->p), wtos(j->np));
                     38:                j = all? j->next : 0;
                     39:        }
                     40: }

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