From 566d54fe549286895fdef8aa9f385686405dd290 Mon Sep 17 00:00:00 2001 From: Nicholas Noll Date: Wed, 13 Oct 2021 16:46:20 -0700 Subject: RM(rc): old code. too many assumptions baked in --- sys/cmd/rc/pfnc.c | 71 ------------------------------------------------------- 1 file changed, 71 deletions(-) delete mode 100644 sys/cmd/rc/pfnc.c (limited to 'sys/cmd/rc/pfnc.c') diff --git a/sys/cmd/rc/pfnc.c b/sys/cmd/rc/pfnc.c deleted file mode 100644 index f6f32cd..0000000 --- a/sys/cmd/rc/pfnc.c +++ /dev/null @@ -1,71 +0,0 @@ -#include "rc.h" -#include "exec.h" -#include "io.h" -#include "fns.h" -struct{ - void (*f)(void); - char *name; -}fname[] = { - Xappend, "Xappend", - Xasync, "Xasync", - Xbang, "Xbang", - Xclose, "Xclose", - Xdup, "Xdup", - Xeflag, "Xeflag", - Xexit, "Xexit", - Xfalse, "Xfalse", - Xifnot, "Xifnot", - Xjump, "Xjump", - Xmark, "Xmark", - Xpopm, "Xpopm", - Xrdwr, "Xrdwr", - Xread, "Xread", - Xreturn, "Xreturn", - Xtrue, "Xtrue", - Xif, "Xif", - Xwastrue, "Xwastrue", - Xword, "Xword", - Xwrite, "Xwrite", - Xmatch, "Xmatch", - Xcase, "Xcase", - Xconc, "Xconc", - Xassign, "Xassign", - Xdol, "Xdol", - Xcount, "Xcount", - Xlocal, "Xlocal", - Xunlocal, "Xunlocal", - Xfn, "Xfn", - Xdelfn, "Xdelfn", - Xpipe, "Xpipe", - Xpipewait, "Xpipewait", - Xrdcmds, "Xrdcmds", - (void (*)(void))Xerror, "Xerror", - Xbackq, "Xbackq", - Xpipefd, "Xpipefd", - Xsubshell, "Xsubshell", - Xdelhere, "Xdelhere", - Xfor, "Xfor", - Xglob, "Xglob", - Xrdfn, "Xrdfn", - Xsimple, "Xsimple", - Xrdfn, "Xrdfn", - Xqdol, "Xqdol", -0}; - -void -pfnc(Io *fd, Thread *t) -{ - int i; - void (*fn)(void) = t->code[t->pc].f; - Words *a; - pfmt(fd, "pid %d cycle %p %d ", getpid(), t->code, t->pc); - for(i = 0;fname[i].f;i++) if(fname[i].f==fn){ - pstr(fd, fname[i].name); - break; - } - if(!fname[i].f) - pfmt(fd, "%p", fn); - for(a = t->argv;a;a = a->next) pfmt(fd, " (%v)", a->words); - pchr(fd, '\n'); - flush(fd); -} -- cgit v1.2.1