diff options
| -rw-r--r-- | sys/lib/acid/kernel | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/sys/lib/acid/kernel b/sys/lib/acid/kernel index 22f562b25..68c484b5d 100644 --- a/sys/lib/acid/kernel +++ b/sys/lib/acid/kernel @@ -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"); } } |