GHC 警告我没有顶层的函数签名。我不明白为什么我需要它们。提供它们的问题是它们非常复杂,就像这个(自动生成的):
applyValue :: forall t t1 t2 t3 t4.
(t2 -> t)
-> (t2 -> t3 -> t4 -> t1) -> t2 -> t3 -> t4 -> (t -> Bool) -> [t1]
那么我为什么要费心添加它们呢?
函数本身:
applyValue getValueAt stitchAndMove at fabric mark matchAt =
if matchAt (getValueAt at)
then [stitchAndMove at fabric mark]
else []