Haskell commit