fourmolu-0.2.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