Blob
1 defn logs() {2 local h, p;3 p = (vl+sizeofQLock);4 loop 1, 1024 do5 {6 h = (VtLog)*p;7 while h do8 {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 then24 c = l.chunk;25 c = (VtLogChunk)c;26 print(stringn(c.p, c.wp-c.p)\s);27 }28 }