|
|
1.1 ! root 1: /* ! 2: * Structure for mapping string names of procedures to block addresses. ! 3: */ ! 4: struct pstrnm { ! 5: char *pstrep; ! 6: struct b_proc *pblock; ! 7: }; ! 8: ! 9: extern struct b_proc ! 10: #define PDEF(p) B/**/p, ! 11: #include "../h/pdef.h" ! 12: interp; /* Hack to avoid ,; in expansion */ ! 13: #undef PDEF ! 14: ! 15: extern struct b_proc ! 16: Basgn, ! 17: Bbang, ! 18: Bcat, ! 19: Bcompl, ! 20: Bdiff, ! 21: Bdiv, ! 22: Beqv, ! 23: Binter, ! 24: Blconcat, ! 25: Blexeq, ! 26: Blexge, ! 27: Blexgt, ! 28: Blexle, ! 29: Blexlt, ! 30: Blexne, ! 31: Bminus, ! 32: Bmod, ! 33: Bmult, ! 34: Bneg, ! 35: Bneqv, ! 36: Bnonnull, ! 37: Bnull, ! 38: Bnumber, ! 39: Bnumeq, ! 40: Bnumge, ! 41: Bnumgt, ! 42: Bnumle, ! 43: Bnumlt, ! 44: Bnumne, ! 45: Bplus, ! 46: Bpower, ! 47: Brandom, ! 48: Brasgn, ! 49: Brefresh, ! 50: Brswap, ! 51: Bsect, ! 52: Bsize, ! 53: Bsubsc, ! 54: Bswap, ! 55: Btabmat, ! 56: Btoby, ! 57: Bunioncs, ! 58: Bvalue; ! 59: ! 60: struct pstrnm pntab[] = { ! 61: #define PDEF(p) "p", &B/**/p, ! 62: #include "../h/pdef.h" ! 63: #undef PDEF ! 64: ":=", &Basgn, ! 65: "!", &Bbang, ! 66: "||", &Bcat, ! 67: "~", &Bcompl, ! 68: "--", &Bdiff, ! 69: "/", &Bdiv, ! 70: "===", &Beqv, ! 71: "**", &Binter, ! 72: "|||", &Blconcat, ! 73: "==", &Blexeq, ! 74: ">>=", &Blexge, ! 75: ">>", &Blexgt, ! 76: "<<=", &Blexle, ! 77: "<<", &Blexlt, ! 78: "~==", &Blexne, ! 79: "-", &Bminus, ! 80: "%", &Bmod, ! 81: "*", &Bmult, ! 82: "-", &Bneg, ! 83: "~===", &Bneqv, ! 84: "\\", &Bnonnull, ! 85: "/", &Bnull, ! 86: "+", &Bnumber, ! 87: "=", &Bnumeq, ! 88: ">=", &Bnumge, ! 89: ">", &Bnumgt, ! 90: "<=", &Bnumle, ! 91: "<", &Bnumlt, ! 92: "~=", &Bnumne, ! 93: "+", &Bplus, ! 94: "^", &Bpower, ! 95: "?", &Brandom, ! 96: "<-", &Brasgn, ! 97: "^", &Brefresh, ! 98: "<->", &Brswap, ! 99: ":", &Bsect, ! 100: "*", &Bsize, ! 101: "[]", &Bsubsc, ! 102: ":=:", &Bswap, ! 103: "=", &Btabmat, ! 104: "...", &Btoby, ! 105: "++", &Bunioncs, ! 106: ".", &Bvalue, ! 107: 0, 0 ! 108: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.