fourmolu-0.7.0.0: data/examples/declaration/value/function/list-notation-3-four-out.hs

foo =
    reportSDoc "tc.cc" 30 $ sep $ do
        (prettyTCM q <+> " before compilation") : do
            map (prettyTCM . map unArg . clPats) cls

foo =
    reportSDoc "tc.cc" 30 $ sep $ do
        (prettyTCM q <+> " before compilation")
            : do
                map (prettyTCM . map unArg . clPats) cls