Disable test that require --install-ghc on Alpine Linux

Alpine Linux does yet support installing GHC.

Author: borsboom

test/integration/lib/StackTest.hs

@@ -173,6 +173,9 @@ exeExt = if isWindows then ".exe" else ""
 -- | Is the OS Windows?
 isWindows = os == "mingw32"
 
+-- | Is the OS Alpine Linux?
+getIsAlpine = doesFileExist "/etc/alpine-release"
+
 -- | 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/1336-1337-new-package-names/Main.hs

@@ -6,8 +6,7 @@ import System.FilePath
 main :: IO ()
 main =
     if isWindows
-        -- Disabled on Windows (see https://github.com/commercialhaskell/stack/issues/1337#issuecomment-166118678)
-        then return ()
+        then logInfo "Disabled on Windows (see https://github.com/commercialhaskell/stack/issues/1337#issuecomment-166118678)"
         else do
             stack ["new", "1234a-4b-b4-abc-12b34"]
             doesExist "./1234a-4b-b4-abc-12b34/stack.yaml"

test/integration/tests/1337-unicode-everywhere/Main.hs

@@ -4,8 +4,7 @@ import StackTest
 main :: IO ()
 main =
     if isWindows
-        -- Disabled on Windows (see https://github.com/commercialhaskell/stack/issues/1337#issuecomment-166118678)
-        then return ()
+        then logInfo "Disabled on Windows (see https://github.com/commercialhaskell/stack/issues/1337#issuecomment-166118678)"
         else do
             stack ["build"]
             stack ["exec", "以-exe"]

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

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

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

@@ -3,9 +3,13 @@ import System.Directory
 
 main :: IO ()
 main = do
-    run "cabal" ["sandbox", "init"]
-    stack ["unpack", "acme-dont-1.1"]
-    run "cabal" ["install", "./acme-dont-1.1"]
-    removeDirectoryRecursive "acme-dont-1.1"
-    stack ["--install-ghc", "init", "--solver"]
-    stack ["build"]
+  isAlpine <- getIsAlpine
+  if isAlpine
+    then logInfo "Disabled on Alpine Linux since it cannot yet install its own GHC."
+    else do
+      run "cabal" ["sandbox", "init"]
+      stack ["unpack", "acme-dont-1.1"]
+      run "cabal" ["install", "./acme-dont-1.1"]
+      removeDirectoryRecursive "acme-dont-1.1"
+      stack ["--install-ghc", "init", "--solver"]
+      stack ["build"]