ghc-exactprint-0.2: tests/examples/Foo.hs

{-# LANGUAGE RecursiveDo #-}

bar :: IO ()
bar = do
  rec {}
  return ()