invokeScons = do
  let lapackeDir = currentDir </> "lapacke"
  msl <- programFindLocation scons verbose
  let mSconsInvoke = msl >>= \sl -> 
        return (simpleConfiguredProgram "scons" (FoundOnSystem sl)) >>= \confScons ->
        return (programInvocation confScons []) >>= \sconsInvoke ->
        return (sconsInvoke { progInvokeCwd = Just lapackeDir })
        
  success <- 
    case mSconsInvoke of
      Just sconsInvoke -> 
        callProgram (progInvokePath sconsInvoke) [] (progInvokeCwd sconsInvoke)
      -- runProgramInvocation deafening sconsInvoke -- This is apparently not implemented in cabal.
      _ -> 
        die "*** Running scons has failed while trying to build LAPACKE. Is scons installed?" >>
        return False
  
  return $ if success 
           then (Just (emptyBuildInfo { buildable = True }), [])
           else (Just (emptyBuildInfo { buildable = False }), [])
invokeScons = do
  let lapackeDir = currentDir </> "lapacke"
  msl <- programFindLocation scons verbose
  let mSconsInvoke = msl >>= \sl -> 
        return (simpleConfiguredProgram "scons" (FoundOnSystem sl)) >>= \confScons ->
        return (programInvocation confScons []) >>= \sconsInvoke ->
        return (sconsInvoke { progInvokeCwd = Just lapackeDir })
        
  success <- 
    case mSconsInvoke of
      Just sconsInvoke -> 
        callProgram (progInvokePath sconsInvoke) [] (progInvokeCwd sconsInvoke)
      -- runProgramInvocation deafening sconsInvoke -- This is apparently not implemented in cabal.
      _ -> 
        die "*** Running scons has failed while trying to build LAPACKE. Is scons installed?" >>
        return False
  
  return $ if success 
           then (Just (emptyBuildInfo { buildable = True }), [])
           else (Just (emptyBuildInfo { buildable = False }), [])
invokeScons = do
  let lapackeDir = currentDir </> "lapacke"
  msl <- programFindLocation scons verbose
  let mSconsInvoke = msl >>= \sl -> 
        return (simpleConfiguredProgram "scons" (FoundOnSystem sl)) >>= \confScons ->
        return (programInvocation confScons []) >>= \sconsInvoke ->
        return (sconsInvoke { progInvokeCwd = Just lapackeDir })
        
  success <- 
    case mSconsInvoke of
      Just sconsInvoke -> 
        callProgram (progInvokePath sconsInvoke) [] (progInvokeCwd sconsInvoke)
      -- runProgramInvocation deafening sconsInvoke -- This is apparently not implemented in cabal.
      _ -> 
        die "*** Running scons has failed while trying to build LAPACKE. Is scons installed?" >>
        return False
  
  return $ if success 
           then (Just (emptyBuildInfo { buildable = True }), [])
           else (Just (emptyBuildInfo { buildable = False }), [])