cirno/plan9port
1
0
Fork 0
mirror of https://github.com/9fans/plan9port.git synced 2025-01-12 11:10:07 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

tweaks

Browse source
This commit is contained in:
rsc 2004-09-17 22:06:42 +00:00
parent bcf527a98e
commit 80e841abcf
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
acid/thread
View file

@ -185,6 +185,7 @@ defn stacks(){
P = (Proc)_threadpq.$head;
while P != 0 do{
proc(P);
if mainpid != P.pid then setproc(P.pid);
// setproc(P.pid);
// if P.thread==0 then{
// print("=== thread scheduler stack\n");
@ -192,6 +193,7 @@ defn stacks(){
// }
// print("threadstks(", P\X, ")\n");
threadstks(P);
if mainpid != P.pid then setproc(mainpid);
P = (Proc)P.next;
print("\n");
}
@ -206,6 +208,7 @@ defn stacksizes(){
P = (Proc)_threadpq.$head;
while P != 0 do{
P = (Proc)P;
if mainpid != P.pid then setproc(P.pid);
Tq = (Tqueue)P.threads;
T = (Thread)Tq.$head;
while T != 0 do{
@ -213,12 +216,12 @@ defn stacksizes(){
if T.state==Running then {
sp = *SP;
}else{
sp = *(T.sched);
sp = T.sched.sp;
}
sp = *(T.sched);
print(top-sp\D, "\n");
print(top-sp\D, " of ", T.stksize\D, " - 0x", top\X, " 0x", sp\X, " ", *T.stk\X, "\n");
T = (Thread)T.nextt;
}
if mainpid != P.pid then setproc(mainpid);
P = P.next;
}
// setproc(mainpid);