Blob


1 defn logs() {
2 local h, p;
3 p = (vl+sizeofQLock);
4 loop 1, 1024 do
5 {
6 h = (VtLog)*p;
7 while h do
8 {
9 print("log(",h\X,") // ",*(h.name\s),"\n");
10 h = (VtLog)h.next;
11 }
12 p = p+4;
13 }
14 }
16 defn log(l) {
17 local c, nc;
19 l = (VtLog)l;
20 c = l.w;
21 loop 1,l.nchunk do {
22 c = c+sizeofVtLogChunk;
23 if c == l.chunk+l.nchunk*sizeofVtLogChunk then
24 c = l.chunk;
25 c = (VtLogChunk)c;
26 print(stringn(c.p, c.wp-c.p)\s);
27 }
28 }