Fix MemSize instance for modified IntTrie

haskell · Sep 23, 2013 · 28a6c6e · 28a6c6e
1 parent 6760701
commit 28a6c6e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Data/IntTrie.hs b/Data/IntTrie.hs
@@ -42,7 +42,7 @@ newtype IntTrie k v = IntTrie (A.UArray Word32 Word32)
 $(deriveSafeCopy 1 'base ''IntTrie)
 
 instance MemSize (IntTrie k v) where
-    memSize (IntTrie o) = memSizeUArray 2 o
+    memSize (IntTrie o) = memSizeUArray 4 o
 
 -- Compact, read-only implementation of a trie. It's intended for use with file
 -- paths, but we do that via string ids.