ghc-exactprint-1.14.1.0: tests/examples/pre-ghc910/RedundantDo.hs

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