在 Haskell 分析时排除开销

Question

有没有一种好方法可以从 Haskell 的分析中排除某些函数调用？

我正在加载字典的大型二进制转储文件，这需要几秒钟的时间，并且完全覆盖了我感兴趣的代码部分。

COST CENTRE          MODULE     %time %alloc

read_wordlist        Wordlists   93.6   98.3
solve                Solver       1.3    0.0
anagrams             Evaluation   0.8    1.4
[...]

作为参考，我正在像这样加载字典

read_wordlist = do
    ls <- fmap Text.lines (Text.readFile "data/straight-wordlist")
    (return . Data.Set.fromList . string_read . toString . Prelude.head) ls

所有代码都在模块中分开（但很普通，等等）。

是否有一些 SCC 注释安排意味着我可以偷偷地完成所有开销加载，而不会将其计入我的整体统计数据？

Answer 1

从 GHC 7.8 开始，您可以：

import GHC.Profiling
import Control.Deepseq

main = do
    stopProfTimer
    wordlist <- read_wordlist
    return $!! wordlist -- Ensure it is fully evaluated in the untimed section
    startProfTimer
    print (solve wordlist)

这似乎只是停止收集时间统计信息，而不是分配。