clean up pthread for linux

This commit is contained in:
rsc 2005-02-11 16:51:43 +00:00
parent 2709e6e368
commit 2a931b7266
3 changed files with 62 additions and 73 deletions

View file

@ -33,11 +33,6 @@ notelstk(addr)
_stk({"PC", pc, "SP", sp, linkreg(addr)}, 1);
}
// defn labstk(l) // trace from a label
// {
// _stk({"PC", *(l+4), "SP", *l, linkreg(0)}, 0);
// }
defn params(param)
{
while param do {
@ -119,7 +114,6 @@ defn _stk(regs, dolocals)
if callerpc == 0 then
done=1;
}
if callerpc && !done then {
print(stkprefix, fmt(callerpc, 'a'), " ");
pfl(callerpc);