4 import System.Process (
9 import System.Exit ( exitWith )
13 -- Get a CreateProcess object corresponding to our shell command.
14 let createproc = shell "shelltest test/shell/*.test"
16 -- But clear its environment before running the command.
17 let empty_env_createproc = createproc { env = Just [] }
19 -- Ignore stdin/stdout/stderr...
20 (_,_,_,hproc) <- createProcess empty_env_createproc
22 -- Now run the ProcessHandle and exit with its result.
23 result <- waitForProcess hproc