decl
if (troff && !ps.dumped_decl_indent && !is_procname && ps.last_token == decl) {
if (ps.p_stack[ps.tos] == decl && !ps.block_init) /* semicolons can be
case decl: /* we have a declaration type (int, register,
parse(decl); /* let parser worry about indentation */
return (decl);
last_code = decl;
return (decl);
ps.last_token == decl ||
last_code = decl;
return decl;
if (last_code == decl) /* if this is a declared variable, then
case decl: /* finish of a declaration */
case decl: /* scanned a declaration word */
if (ps.p_stack[ps.tos] != decl) { /* only put one declaration
ps.p_stack[++ps.tos] = decl;
if (ps.p_stack[i] == decl)
if (ps.p_stack[ps.tos] == stmt || ps.p_stack[ps.tos] == decl
ptype(proc->args.decls->decl.prefix,
proc->args.decls->decl.type, 1);
ptype(proc->args.decls->decl.prefix,
proc->args.decls->decl.type, 1);
} else if (streq(proc->args.decls->decl.type, "void")) {
fprintf(fout, "%s, ", l->decl.name);
pdeclaration(proc->args.argname, &l->decl, 1, ";\n");
pdeclaration(proc->args.argname, &l->decl, 0, ", ");
if (newstyle && !args2 && (streq(proc->args.decls->decl.type, "void"))) {
l->decl.name, l->decl.name);
stringfix(proc->args.decls->decl.type),
(newstyle ? proc->args.decls->decl.name : "argp"),
print_stat(1, &dl->decl);
print_stat(1, &dl->decl);
if (dl->decl.rel == REL_VECTOR &&
strcmp(dl->decl.type, "opaque") != 0) {
if (dl->decl.prefix == NULL &&
(ptr = find_type(dl->decl.type)) != NULL &&
(dl->decl.rel == REL_ALIAS || dl->decl.rel == REL_VECTOR)) {
if (dl->decl.rel == REL_ALIAS)
print_stat(1, &dl->decl);
if (dl->decl.prefix == NULL &&
(ptr = find_type(dl->decl.type)) != NULL &&
(dl->decl.rel == REL_ALIAS || dl->decl.rel == REL_VECTOR)) {
if (dl->decl.rel == REL_ALIAS)
dl->decl.array_max,
dl->decl.array_max);
print_stat(2, &cur->decl);
print_stat(3, &cur->decl);
emit_inline(&cur->decl, flag);
print_stat(2, &dl->decl);
print_stat(2, &cur->decl);
print_stat(3, &cur->decl);
emit_inline(&cur->decl, flag);
print_stat(1, &dl->decl);
emit_inline(decl, flag)
declaration *decl;
switch (decl->rel) {
emit_single_in_line(decl, flag, REL_ALIAS);
fprintf(fout, "\t\t\t{\n\t\t\t\t%s *genp;\n\n", decl->type);
decl->name, decl->array_max);
emit_single_in_line(decl, flag, REL_VECTOR);
emit_single_in_line(decl, flag, rel)
declaration *decl;
fprintf(fout, "\t\tobjp->%s = IXDR_GET_", decl->name);
upp_case = upcase(decl->type);
fprintf(fout, "%s(buf, objp->%s);\n", upp_case, decl->name);
pdeclaration(name, &l->decl, 1, ";\n");
pdeclaration(name, &l->decl, 1, ";\n");
declaration *decl;
decl = &def->def.un.enum_decl;
if (streq(decl->type, "bool")) {
fprintf(fout, "\tbool_t %s;\n", decl->name);
fprintf(fout, "\t%s %s;\n", decl->type, decl->name);
decl = def->def.un.default_decl;
if (decl && !streq(decl->type, "void")) {
pdeclaration(name, decl, 2, ";\n");
streq(proc->args.decls->decl.type, "void")) {
ptype(dl->decl.prefix, dl->decl.type, 1);
decls->decl = dec;
decls->decl = dec;
decls->decl = dec;
declaration decl;
if (!streq(proc->args.decls->decl.type, "void"))
ptype(proc->args.decls->decl.prefix,
proc->args.decls->decl.type, 1);
} else if (!streq(proc->args.decls->decl.type, "void")) {
ptype(l->decl.prefix, l->decl.type, 1);
fprintf(fout, "_%s;\n", l->decl.name);
if (streq(proc->args.decls->decl.type, "void"))
} else if (streq(proc->args.decls->decl.type, "void")) {
fprintf(fout, "_%s, ", l->decl.name);
ptype(proc->args.decls->decl.prefix,
proc->args.decls->decl.type, 0);
ptype(proc->args.decls->decl.prefix,
proc->args.decls->decl.type, 0);
if (!streq(proc->args.decls->decl.type, "void"))
fprintf(fout, "argp->%s, ", l->decl.name);
if (streq(proc->args.decls->decl.type,
ptype(proc->args.decls->decl.prefix,
proc->args.decls->decl.type, 0);
p_xdrfunc(ARG, proc->args.decls->decl.type);
printit(proc->args.decls->decl.prefix,
proc->args.decls->decl.type);
struct oid *oid, *decl;
decl = RB_FIND(oidtree, &smi_oidtree, oid);
if (decl == NULL)