ghc-exactprint-0.5.0.0: tests/examples/ghc710/RedundantDo.hs

foo =
  case x of
    True -> foo
    False -> foo