From 70071241bfbd06a02d61c6bfcc66e35eb7704d81 Mon Sep 17 00:00:00 2001
From: Mike Pall <mike>
Date: Wed, 8 Dec 2010 20:37:22 +0100
Subject: [PATCH] Fix type-based colorization of snapshot slots in debug
 output.

---
 lib/dump.lua | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/dump.lua b/lib/dump.lua
index 687d79db..f476f3f0 100644
--- a/lib/dump.lua
+++ b/lib/dump.lua
@@ -307,7 +307,7 @@ local function printsnap(tr, snap)
 	out:write(formatk(tr, ref))
       else
 	local m, ot, op1, op2 = traceir(tr, ref)
-	out:write(colorize(format("%04d", ref), band(ot, 15)))
+	out:write(colorize(format("%04d", ref), band(ot, 31)))
       end
       out:write(band(sn, 0x10000) == 0 and " " or "|") -- SNAP_FRAME
     else