Haskell标准-'nf'应用于过少的参数

Question

我是Haskell的新手。 我正在对二进制搜索算法进行基准测试（Criteriaon）。 我不断收到错误消息：'nf'应用于的参数太少了，我在做什么错。

谢谢

binSear array serNum lowInx highInx
   | highInx < lowInx       = -1
   | array!!sred > serNum = binSear array serNum lowInx (mid-1)
   | array!!sred < serNum = binSear array serNum (mid+1) highInx
   | otherwise            = mid
   where
   mid = lowInx + ((highInx - lowInx) `div` 2)

main = do
        let arr = [1..10000000]
        defaultMain [
            bench "1" $ nf (binSear arr 54527 0 9999999)
          ]

Answer 1

nf的类型是（a-> b）-> a-> b ，因此它需要两个参数：一个函数和对该函数的输入。 该函数应产生一个Benchmarkable。

在您的情况下，您只是将一个参数传递给nf ：函数本身，但是该函数已完全应用，因此它不希望有任何附加参数，也不会传递该附加参数。 在这种情况下，您应该部分应用该函数并将该额外参数传递给nf。

您可能被迫重新排序binSear的参数或创建一个辅助lambda来这样做，以确保在最后一个参数中发生弯曲，并且应将该参数传递到括号之外的nf 。