I believe the following is not indented correctly. It only happens with (x:xs) when you use nested cases, I think. case foo of [] -> case bar of [] -> return () (x:xs) -> -- http://wagerlabs.com/