Disable integration tests that require --install-ghc on ARM

Author: borsboom

test/integration/lib/StackTest.hs

@@ -13,7 +13,7 @@ import System.IO
 import System.IO.Error
 import System.Process
 import System.Exit
-import System.Info (os)
+import System.Info (arch, os)
 
 run' :: FilePath -> [String] -> IO ExitCode
 run' cmd args = do
@@ -176,6 +176,9 @@ isWindows = os == "mingw32"
 -- | Is the OS Alpine Linux?
 getIsAlpine = doesFileExist "/etc/alpine-release"
 
+-- | Is the architecture ARM?
+isARM = arch == "arm"
+
 -- | To avoid problems with GHC version mismatch when a new LTS major
 -- version is released, pass this argument to @stack@ when running in
 -- a global context.  The LTS major version here should match that of

test/integration/tests/444-package-option/Main.hs

@@ -3,6 +3,6 @@ import StackTest
 main :: IO ()
 main = do
   isAlpine <- getIsAlpine
-  if isAlpine
-    then logInfo "Disabled on Alpine Linux since it cannot yet install its own GHC."
+  if isAlpine || isARM
+    then logInfo "Disabled on Alpine Linux and ARM since it cannot yet install its own GHC."
     else stack ["--install-ghc", "runghc", "--package", "safe", "Test.hs"]

test/integration/tests/cabal-solver/Main.hs

@@ -4,8 +4,8 @@ import System.Directory
 main :: IO ()
 main = do
   isAlpine <- getIsAlpine
-  if isAlpine
-    then logInfo "Disabled on Alpine Linux since it cannot yet install its own GHC."
+  if isAlpine || isARM
+    then logInfo "Disabled on Alpine Linux and ARM since it cannot yet install its own GHC."
     else do
       run "cabal" ["sandbox", "init"]
       stack ["unpack", "acme-dont-1.1"]