hunk ./Trace/Hpc/Reflect.hsc 43 -data ModuleInfo = ModuleInfo String Int Hash (Ptr Word64) +data ModuleInfo = ModuleInfo String Word32 Hash (Ptr Word64) hunk ./Trace/Hpc/Reflect.hsc 60 - sequence_ [ pokeArray ptr $ take count $ repeat 0 + sequence_ [ pokeArray ptr $ take (fromIntegral count) $ repeat 0 hunk ./Trace/Hpc/Reflect.hsc 68 - mods <- sequence [ do tixs <- peekArray count ptr - return $ TixModule mod' hash count + mods <- sequence [ do tixs <- peekArray (fromIntegral count) ptr + return $ TixModule mod' hash (fromIntegral count) hunk ./Trace/Hpc/Reflect.hsc 85 - || count1 /= count2 + || (fromIntegral count1) /= count2 hunk ./hpc.cabal 31 - containers >= 0.1 && < 0.4 + containers >= 0.1 && < 0.5