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
 5 2faae3ce 2005-02-16 devnull 	{
 6 2faae3ce 2005-02-16 devnull 		h = (VtLog)*p;
 7 2faae3ce 2005-02-16 devnull 		while h do
 8 2faae3ce 2005-02-16 devnull 		{
 9 2faae3ce 2005-02-16 devnull 			print("log(",h\X,")  // ",*(h.name\s),"\n");
10 2faae3ce 2005-02-16 devnull 			h = (VtLog)h.next;
11 2faae3ce 2005-02-16 devnull 		}
12 2faae3ce 2005-02-16 devnull 		p = p+4;
13 2faae3ce 2005-02-16 devnull 	}
14 2faae3ce 2005-02-16 devnull }
15 2faae3ce 2005-02-16 devnull 
16 2faae3ce 2005-02-16 devnull defn log(l) {
17 2faae3ce 2005-02-16 devnull 	local c, nc;
18 2faae3ce 2005-02-16 devnull 
19 2faae3ce 2005-02-16 devnull 	l = (VtLog)l;
20 2faae3ce 2005-02-16 devnull 	c = l.w;
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);
27 2faae3ce 2005-02-16 devnull 	}
28 2faae3ce 2005-02-16 devnull }