execAction :: ExecFlags -> [String] -> Action
execAction execFlags extraArgs globalFlags = do
  let verbosity = fromFlag (execVerbosity execFlags)
  (useSandbox, config) <- loadConfigOrSandboxConfig verbosity globalFlags
  let configFlags = savedConfigureFlags config
  (comp, platform, conf) <- getPersistOrConfigCompiler configFlags
  exec verbosity useSandbox comp platform conf extraArgs
execAction :: ExecFlags -> [String] -> Action
execAction execFlags extraArgs globalFlags = do
  let verbosity = fromFlag (execVerbosity execFlags)
  (useSandbox, config) <- loadConfigOrSandboxConfig verbosity globalFlags
  let configFlags = savedConfigureFlags config
  (comp, platform, conf) <- getPersistOrConfigCompiler configFlags
  exec verbosity useSandbox comp platform conf extraArgs
execAction execFlags extraArgs globalFlags = do
  let verbosity = fromFlag (execVerbosity execFlags)
  (useSandbox, config) <- loadConfigOrSandboxConfig verbosity globalFlags
  let configFlags = savedConfigureFlags config
  (comp, platform, conf) <- getPersistOrConfigCompiler configFlags
  exec verbosity useSandbox comp platform conf extraArgs