o5r/plan9port
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

be careful about not switching to procs unless necessary.

Browse source
This commit is contained in:
rsc 2004-05-23 00:58:00 +00:00
parent 1c39bb5919
commit c9896e2edb
1 changed files with 11 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

16
acid/thread
View file

@ -81,11 +81,15 @@ defn stkignore(s){
}
defn threadstkline(T){
local stk, frame, pc, pc0, file, s, sym, i, stop;
local stk, frame, pc, pc0, file, s, sym, i, stop, P, mainpid;
if T.state == Running then
if T.state == Running then {
P = (Proc)T.proc;
mainpid = pid;
if mainpid != P.pid then setproc(P.pid);
stk = strace({});
else
if mainpid != P.pid then setproc(mainpid);
} else
stk = strace(label(T.sched));
stop = 0;
@ -151,7 +155,6 @@ defn pthreads(P){
local T, Tq, mainpid;
mainpid = pid;
// setproc(P.pid);
Tq = (Tqueue)P.threads;
T = (Thread)Tq.$head;
while T != 0 do{
@ -159,7 +162,6 @@ defn pthreads(P){
thread(T);
T = (Thread)T.nextt;
}
// setproc(mainpid);
}
defn threads(){
@ -305,7 +307,11 @@ defn threadstk(T){
// setproc(P.pid);
if T.state == Running then{
if P.pid != mainpid then
setproc(P.pid);
stk();
if P.pid != mainpid then
setproc(mainpid);
} else {
labstk(T.sched);
}