Fix default checker in Haskell.