-- | Run an executable in the current environment.
--
-- INCOMPLETE.
runExe :: [String] -> Exe -> Experiment ()
runExe args (Exe cmd) = liftIO $ do
  (_, _, _, h) <- createProcess (proc cmd args)
  waitForProcess h
  return ()


-- Flag dependencies
runExe :: [String] -> Exe -> Experiment ()
runExe args (Exe cmd) = liftIO $ do
  (_, _, _, h) <- createProcess (proc cmd args)
  waitForProcess h
  return ()


-- Flag dependencies
runExe args (Exe cmd) = liftIO $ do
  (_, _, _, h) <- createProcess (proc cmd args)
  waitForProcess h
  return ()


-- Flag dependencies