[("tests/examples/Async.hs:(4,1)-(10,35): Warning: Redundant lambda\nFound:\n  asyncUsing doFork\n    = \\ action\n        -> do var <- newEmptyTMVarIO\n              t <- mask\n                     $ \\ restore\n                         -> doFork $ try (restore action) >>= atomically . putTMVar var\n              return (Async t (readTMVar var))\nPerhaps:\n  asyncUsing doFork action\n    = do var <- newEmptyTMVarIO\n         t <- mask\n                $ \\ restore\n                    -> doFork $ try (restore action) >>= atomically . putTMVar var\n         return (Async t (readTMVar var))\n",[Replace {rtype = Decl, pos = SrcSpan {startLine = 4, startCol = 1, endLine = 10, endCol = 36}, subts = [("body",SrcSpan {startLine = 4, startCol = 32, endLine = 10, endCol = 36}),("a",SrcSpan {startLine = 4, startCol = 12, endLine = 4, endCol = 18}),("b",SrcSpan {startLine = 4, startCol = 22, endLine = 4, endCol = 28})], orig = "asyncUsing a b = body"}])]