fork(3) download
copy 
  1. import System.Process
  2. import System.Exit
  3.  
  4. main = do
  5.   (_,_,_,p) <- createProcess (proc "dirdcv" [])
  6.   ExitFailure _ <- waitForProcess p
  7.  
  8.   -- This line is never printed:
  9.   putStrLn "The command failed"
Success #stdin #stdout 0s 6312KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
The command failed
https://ideone.com/l8U0pT
language:
Haskell (ghc 8.4.4)
created:
10 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!