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