checkAll :: [(Int,String)] -> Module () -> Config -> String -> (Config -> String -> [(Int,String)] -> [Message] -> a) -> a