/sys/lib/acid/kernel: fix imagecache() and procenv()
This commit is contained in:
parent
e52677328b
commit
14817c4991
1 changed files with 6 additions and 6 deletions
|
@ -27,7 +27,6 @@ defn path(p) {
|
|||
}
|
||||
|
||||
// print Image cache contents
|
||||
// requires include("/sys/src/9/xxx/segment.acid")
|
||||
IHASHSIZE = 64;
|
||||
defn imagecacheline(h) {
|
||||
while h != 0 do {
|
||||
|
@ -41,7 +40,7 @@ defn imagecache() {
|
|||
local i;
|
||||
|
||||
i=0; loop 1,IHASHSIZE do {
|
||||
imagecacheline(imagealloc.free[i]);
|
||||
imagecacheline(imagealloc.hash[i]);
|
||||
i = i+1;
|
||||
}
|
||||
}
|
||||
|
@ -182,17 +181,17 @@ defn proc(p) {
|
|||
|
||||
defn procenv(p) {
|
||||
complex Proc p;
|
||||
local e, v;
|
||||
local i, e, v;
|
||||
|
||||
e = p.egrp;
|
||||
complex Egrp e;
|
||||
v = e.ent;
|
||||
while v != 0 do {
|
||||
i=0; loop 1,e.nent do {
|
||||
v = e.ent[i];
|
||||
i = i+1;
|
||||
complex Evalue v;
|
||||
print(*(v.name\s), "=");
|
||||
printstringn(v.value, v.len);
|
||||
print("\n");
|
||||
v = v.link;
|
||||
}
|
||||
}
|
||||
|
||||
|
@ -379,5 +378,6 @@ if (map()[2]) != {} then { // map has more than two elements -> active proc
|
|||
}
|
||||
needacid("proc");
|
||||
needacid("chan");
|
||||
needacid("segment");
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue