Add some architectures

2020-06-27 19:00:13 +02:00
parent cbf076740a
commit f9251589cd
3 changed files with 26 additions and 9 deletions
--- a/app/ghcup/Main.hs
+++ b/app/ghcup/Main.hs
@@ -1425,6 +1425,13 @@ Version: #{describe_result}|]
  prettyArch :: Architecture -> String
  prettyArch A_64 = "amd64"
  prettyArch A_32 = "i386"
+  prettyArch A_PowerPC = "PowerPC"
+  prettyArch A_PowerPC64 = "PowerPC64"
+  prettyArch A_Sparc = "Sparc"
+  prettyArch A_Sparc64 = "Sparc64"
+  prettyArch A_ARM = "ARM"
+  prettyArch A_ARM64 = "ARM64"
+
  prettyPlatform :: PlatformResult -> String
  prettyPlatform PlatformResult { _platform = plat, _distroVersion = Just v' }
    = show plat <> ", " <> show v'