{- block comment -} {-# LANGUAGE TupleSections #-} {-| multi line block haddock -} module BlockCommentThenMultiLineBlockHaddock where import Data.List (intercalate) import System.IO (hFlush) a = (1,)