Well, in the end I gave up: set sw=2 for Haskell