commit - d7688cce37173e43796f5243da7507b9e7c7a063
commit + 2faae3ce69586f60a3a764e58d2d804801ed4890
blob - /dev/null
blob + 84e207c3bd484301129eacd58ee4ebe0dd19910e (mode 644)
--- /dev/null
+++ acid/venti
@@ -0,0 +1,28 @@
+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);
+	}
+}