Lines Matching defs:op
80 char* op; /* output buffer pointer */
361 init(struct proto* proto, char* op, int flags)
367 op = strcopy(op, "\
429 op = strcopy(op, "\
461 switch (*op++ = *s++)
464 op--;
467 op = strcopy(op - 1, proto->package);
475 return op;
478 #define BACKOUT() (op=ko)
481 #define CACHEOUT() (op=proto->op)
483 #define KEEPOUT() (ko=op)
484 #define LASTOUT() (*(op-1))
485 #define PUTCHR(c) (*op++=(c))
488 #define SYNCOUT() (proto->op=op)
490 #define UNPUTCHR() (op--)
548 register char* op;
603 MEMCPY(op, ip, n);
611 if (op > proto->ob && *(op - 1) == '=' && (op == proto->ob + 1 || *(op - 2) != '=')) switch (c)
733 for (n = 0, t = qe + 1; t < op && (*t == ' ' || *t == '\t' || *t == '\n' && ++n || *t >= 'A' && *t <= 'Z' || *t == '_'); t++);
734 if (t == op)
736 op = qe;
754 qe = (c == '"') ? op : (char*)0;
857 if (op != proto->ob && LASTOUT() != ' ' && LASTOUT() != '\n')
872 op = strcopy(om, "/* ");
873 op = strcopy(op, im);
874 op = strcopy(op, " */\n");
884 op = strcopy(om, "#if defined(__STDC__) || defined(__STDPP__)\n");
885 op = strcopy(op, im);
886 op = strcopy(op, "\n#else\n");
889 *op++ = *ip++;
890 while (*op = *ip++)
891 if (*op++ == '#' && *ip != '(')
893 op--;
894 while (*--op == ' ' || *op == '\t');
897 op = strcopy(op + 1, "/**/");
902 if (*op != '"') *++op = '"';
903 op++;
905 while ((c = *ip) >= 'A' && c <= 'Z' || c >= 'a' && c <= 'z' || c >= '0' && c <= '9' || c == '_') *op++ = *ip++;
908 else *op++ = '"';
912 op = strcopy(op, "\n#endif\n");
913 op = linesync(proto, op, proto->line);
987 op = strcopy(op - 6, "__INLINE__");
1001 proto->ox = op - 6;
1025 memcopy(op - 4, "__V_", 4);
1057 while (op > proto->ob && (*(op - 1) == ' ' || *(op - 1) == '\t'))
1058 op--;
1059 if (op > proto->ob && *(op - 1) != '\n') *op++ = ' ';
1117 om = op - 1;
1132 aom = op - 1;
1226 om = op + (ip - bp);
1246 om = op - 1;
1258 op = strcopy(op, "\
1267 op = linesync(proto, op, proto->line);
1284 op = strcopy(op, "undef __MANGLE__\n");
1285 op = linesync(proto, op, proto->line);
1286 op = strcopy(op, "#define __MANGLE__ __LINKAGE__");
1292 om = op - 1;
1299 op = strcopy(op, "undef __MANGLE__\n");
1300 op = linesync(proto, op, proto->line);
1301 op = strcopy(op, "#define __MANGLE__ __LINKAGE__");
1306 om = op - 1;
1327 v = number(op, args < 0 ? -args : args);
1332 proto_error((char*)proto + sizeof(struct proto), 2, op, NiL);
1362 op = om++;
1365 v = op;
1369 om = (v = (op += 4)) + 1;
1384 om = (e = ++op) + 1;
1392 om = (v = (op += 7)) + 1;
1401 t = op;
1410 if (c != '*' && op > om) PUTCHR(' ');
1416 m = op;
1417 while (op > om && ((c = *(op - 1)) == '(' || c == ')' || c == '[' || c == ']'))
1418 op--;
1419 v = op;
1420 while (op > om && (c = *(op - 1)) != ' ' && c != '*')
1421 op--;
1422 while (*(op - 1) == ' ')
1423 op--;
1426 e = op;
1431 if (op <= om || *(op - 1) == ',' && (*op++ = ' '))
1432 op = strcopy(op, "int");
1434 if (op <= om)
1435 op = strcopy(op, "int");
1436 else if (*(op - 1) == ',')
1437 op = strcopy(op, " int");
1445 if (x = !e) e = op - 1;
1455 op -= m - e;
1463 t = op;
1469 if (op > om && (c = *(op - 1)) == ' ') op--;
1476 if (op > om && *(op - 1) == ' ') op--;
1482 if (op > om && *(op - 1) == '(')
1487 else if ((flags & EXTERN) && (op == om || *(op - 1) == ' ') && *ie == 'r' && !strncmp(ie, "register", 8) && (*(ie + 8) == ' ' || *(ie + 8) == '\t' || *(ie + 8) == '\n'))
1490 if (op > om) UNPUTCHR();
1495 if (op <= om) op = strcopy(op, "void");
1517 op = strcopy(om, " __PARAM__(");
1518 op = memcopy(op, im, ie - im);
1527 op = strcopy(op, "va_alist)) __OTORP__(va_dcl)\n{");
1533 proto->op = op;
1556 op = memcopy(op, m, e - m);
1568 op = memcopy(op, m, e - m);
1572 proto->op = op;
1594 proto->op = strcopy(op, " __OTORP__(");
1604 op = proto->op;
1608 op = linesync(proto, op, proto->line = line);
1656 if (paren == 0 && (flags & DECLARE)) *(op - 1) = c = ';';
1713 ko = op;
1715 v = op += n;
1738 op = om;
1739 while (*--op == ' ' || *op == '\t' || *op == '\n');
1740 if (*op != ')')
1742 op = om += 14;
1743 *--op = ')';
1744 while ((x = *(op - 14)) >= 'A' && x <= 'Z' || x >= 'a' && x <= 'z' || x >= '0' && x <= '9' || x == '_')
1745 *--op = x;
1746 memcopy(op - 13, "(__OTORP__(*)", 13);
1753 op = om;
1754 if (!(flags & TOKENS)) op = strcopy(op, "(...)");
1755 else op = memcopy(op, im, ie - im);
1760 if (flags & DECLARE) op = strcopy(om, "()");
1761 else if (!(flags & TOKENS)) op = strcopy(om, "(__VARARG__)");
1764 op = strcopy(om, " __PROTO__(");
1765 op = memcopy(op, im, ie - im);
1814 op = strcopy(op, " __MANGLE__");
1817 op = strcopy(op - 1, proto->package);
1818 func = op + 1;
1819 op = strcopy(op, "_DATA__");
1829 op -= 3;
1844 op = strcopy(op - 8, "__VA_START__");
1877 op = strcopy(op, " __OTORP__(");
1879 proto->op = op;
1899 op = memcopy(op, m, e - m);
1900 op = strcopy(op, " = ");
1902 op = strcopy(op, "va_arg(");
1903 op = memcopy(op, v, n);
1906 if (m > bp) op = memcopy(op, bp, m - bp);
1907 else op = strcopy(op, "int ");
1908 if (group > 1) op = strcopy(op, ")()");
1909 else op = memcopy(op, e, proto->ip - e - 1);
1925 op = memcopy(op, m, e - m);
1926 op = strcopy(op, " = ");
1928 op = strcopy(op, "va_arg(");
1929 op = memcopy(op, v, n);
1932 if (m > bp) op = memcopy(op, bp, m - bp);
1933 else op = strcopy(op, "int ");
1934 if (group > 1) op = strcopy(op, ")()");
1935 else op = memcopy(op, e, proto->ip - e - 1);
1942 proto->op = op;
1958 op = strcopy(op, ")");
1992 for (;; op--)
1994 switch (*(op - 1))
1998 t = op;
2001 op--;
2009 t = op;
2014 op--;
2027 *op++ = 'L';
2030 m = op;
2031 t = op = m + 10;
2086 op = proto->op;
2088 else while (*ip != '\n') *op++ = *ip++;
2089 op = init(proto, op, flags);
2090 op = linesync(proto, op, proto->line);
2188 proto->op = proto->ob = iob;
2345 proto->op = memcopy(proto->op, proto->ip, m);
2352 if ((comlen = astlicense(proto->op, proto->oz, notice, options, proto->cc[0], proto->cc[1], proto->cc[2])) < 0)
2353 proto_error((char*)proto + sizeof(struct proto), 1, proto->op, NiL);
2355 proto->op += comlen;
2359 proto->op = linesync(proto, proto->op, 1);
2360 proto->iz += proto->op - proto->ob;
2362 memcopy(proto->op, proto->ip, n);
2380 if ((comlen = astlicense(proto->op, proto->oz, notice, options, proto->cc[0], proto->cc[1], proto->cc[2])) < 0)
2381 proto_error((char*)proto + sizeof(struct proto), 1, proto->op, NiL);
2383 proto->op += comlen;
2398 *proto->op++ = '#';
2399 proto->op = strcopy(proto->op, MAGICDIR);
2400 *proto->op++ = ' ';
2401 proto->op = strcopy(proto->op, MAGICARG);
2402 *proto->op++ = '\n';
2413 proto->op = strcopy(proto->op, "\n%{\n" + !notice);
2414 proto->op = strcopy(proto->op, MAGICGEN);
2415 proto->op = strcopy(proto->op, "%}\n");
2420 *proto->op++ = '\n';
2421 proto->op = strcopy(proto->op, MAGICGEN);
2423 proto->op = linesync(proto, proto->op, proto->line);
2425 proto->op = init(proto, proto->op, proto->flags);
2469 if (proto->op == proto->ob)
2476 register char* op = proto->ob;
2496 *op++ = *ip++;
2502 while (op < ep && (n = *op++ = *ip))
2509 *op++ = *ip++;
2516 *op++ = '%';
2523 proto->op = memcopy(proto->ob, proto->ip, ip - proto->ip);
2530 proto->op = strcopy(proto->op, "/* NOTE: some constructs may not have been converted */\n");
2532 n = proto->op - proto->ob;
2533 proto->op = proto->ob;