set corpid

This commit is contained in:
rsc 2005-02-11 16:44:04 +00:00
parent 9d5979815d
commit 211073f16a

View file

@ -51,6 +51,7 @@ sproc(int xpid)
} }
} }
pid = xpid; pid = xpid;
corpid = pid;
s = look("pid"); s = look("pid");
s->v->store.u.ival = pid; s->v->store.u.ival = pid;