fourmolu-0.2.0.0: data/examples/declaration/value/function/list-notation-3-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