--- a/test/System/Process/TypedSpec.hs
+++ b/test/System/Process/TypedSpec.hs
@@ -74,18 +74,3 @@ spec = do
 
     it "checked exit code" $
         runProcess_ "false" `shouldThrow` \ExitCodeException{} -> True
-
-    it "async" $ withSystemTempFile "httpbin" $ \fp h -> do
-        bss <- withProcess (setStdin createSink $ setStdout createSource "base64") $ \p ->
-            runConcurrently $
-                Concurrently
-                    ( httpSink "https://raw.githubusercontent.com/fpco/typed-process/master/README.md" $ \_res ->
-                    CB.conduitHandle h .| getStdin p) *>
-                Concurrently
-                    ( runConduit
-                    $ getStdout p
-                   .| CL.consume)
-        hClose h
-        let encoded = S.filter (/= 10) $ S.concat bss
-        raw <- S.readFile fp
-        encoded `shouldBe` B64.encode raw
