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

foo x y =
   do c <- getChar
      return c