mirror of
https://github.com/9fans/plan9port.git
synced 2025-01-12 11:10:07 +00:00
29 lines
423 B
Text
29 lines
423 B
Text
|
defn logs() {
|
||
|
|
local h, p;
|
||
|
|
p = (vl+sizeofQLock);
|
||
|
|
loop 1, 1024 do
|
||
|
|
{
|
||
|
|
h = (VtLog)*p;
|
||
|
|
while h do
|
||
|
|
{
|
||
|
|
print("log(",h\X,") // ",*(h.name\s),"\n");
|
||
|
|
h = (VtLog)h.next;
|
||
|
|
}
|
||
|
|
p = p+4;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
defn log(l) {
|
||
|
|
local c, nc;
|
||
|
|
|
||
|
|
l = (VtLog)l;
|
||
|
|
c = l.w;
|
||
|
|
loop 1,l.nchunk do {
|
||
|
|
c = c+sizeofVtLogChunk;
|
||
|
|
if c == l.chunk+l.nchunk*sizeofVtLogChunk then
|
||
|
|
c = l.chunk;
|
||
|
|
c = (VtLogChunk)c;
|
||
|
|
print(stringn(c.p, c.wp-c.p)\s);
|
||
|
|
}
|
||
|
|
}
|