Return to walnut.c CVS log

Up to [Research Unix] / researchv10no / cmd / lcc / etc

Annotation of researchv10no/cmd/lcc/etc/walnut.c, revision 1.1

1.1     ! root        1: /* DEC little-endian MIPSes running ULTRIX at DECSRC */
        !             2: 
        !             3: #include <string.h>
        !             4: 
        !             5: char *cpp[] = {
        !             6: /*     "/usr/lib/cmplrs/cc/cpp", "-undef",             /* GNU preprocessor */
        !             7:        "/udir/hanson/bin/mipsel/cpp", "-N", "-D__STDC__=1",    /* dmr's preprocessor */
        !             8:        "-DLANGUAGE_C", "-D_LANGUAGE_C", "-D__LANGUAGE_C",
        !             9:        "-D_unix", "-D__unix", "-Dultrix", "-D_ultrix", "-D__ultrix",
        !            10:        "-Dmips", "-D_mips", "-D__mips",
        !            11:        "-Dhost_mips", "-D_host_mips", "-D__host_mips",
        !            12:        "-DMIPSEL", "-D_MIPSEL", "-D__MIPSEL",
        !            13:        "$1", "$2", "$3", 0 };
        !            14: char *com[] =  { "/udir/hanson/bin/mipsel/rcc", "$1", "$2", "$3", 0 };
        !            15: char *include[] = { "-I/udir/hanson/include/ansi", "-I/usr/include", 0 };
        !            16: char *as[] =  { "/bin/as", "-o", "$3", "", "$1", "-nocpp", "-EL", "$2", 0 };
        !            17: char *ld[] =  { "/usr/bin/ld", "-o", "$3", "/usr/lib/crt0.o", "$1", "$2", "", "", "-lm", "-lc", 0 };
        !            18: 
        !            19: static char *libprefix = "/cmnusr/local/lib/ldb/";
        !            20: extern char *concat();
        !            21: 
        !            22: int option(arg) char *arg; {
        !            23:        if (strcmp(arg, "-g") == 0)
        !            24:                as[3] = "-g";
        !            25:        else if (strcmp(arg, "-p") == 0 && strcmp(ld[3], "/usr/lib/crt0.o") == 0) {
        !            26:                ld[3] = "/usr/lib/mcrt0.o";
        !            27:                ld[7] = "/usr/lib/libprof1.a";
        !            28:        } else if (strcmp(arg, "-b") == 0 && access("/udir/hanson/bin/mipsel/bbexit.o", 4) == 0)
        !            29:                ld[6] = "/udir/hanson/bin/mipsel/bbexit.o";
        !            30:        else if (strncmp(arg, "-B", 2) == 0)
        !            31:                libprefix = arg + 2;
        !            32:        else if (strcmp(arg, "-G") == 0 && strcmp(ld[3], "/usr/lib/crt0.o") == 0) {
        !            33:                com[0] = concat(libprefix, "mipsel/rcc");
        !            34:                ld[0]  = "/cmnusr/local/lib/ldb/ldb-ld";
        !            35:                ld[3]  = concat(libprefix, "mipsel/crt0.o");
        !            36:                ld[7]  = concat(libprefix, "mipsel/Cnub.o");
        !            37:        } else
        !            38:                return 0;
        !            39:        return 1;
        !            40: }

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