From 55717902681f27a0649fbaec9ad17f1cba09eb6f Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 13 Jun 2016 23:25:44 -0400 Subject: add several Architectures Cherry-picked from aa8e99c305a07d99cc63e17ca3461f421859bdc5, but without changes to a module that is being added on the precompiled branch. --- src/Propellor/Types/OS.hs | 21 +++++++++++++++++---- 1 file changed, 17 insertions(+), 4 deletions(-) (limited to 'src/Propellor/Types/OS.hs') diff --git a/src/Propellor/Types/OS.hs b/src/Propellor/Types/OS.hs index 662983b2..7a60d412 100644 --- a/src/Propellor/Types/OS.hs +++ b/src/Propellor/Types/OS.hs @@ -76,12 +76,9 @@ isStable (Stable _) = True isStable _ = False type Release = String -data Architecture = X86_64 | X86_32 | ARMHF | ARMEL | ANDROID +data Architecture = X86_64 | X86_32 | ARMHF | ARMEL | ANDROID | PPC | PPC64 | SPARC | SPARC64 | MIPS | MIPSEL | MIPS64EL | SH4 | IA64 | S390 | S390X | ALPHA | HPPA | M68K | ARM64 | X32 deriving (Show, Eq) -- TODO: remove ANDROID (used in GitAnnexBuilder) --- TODO: add other architectures --- TODO: rename ARMHF --- TODO: rename ARMEL architectureToDebianArchString :: Architecture -> String architectureToDebianArchString X86_64 = "amd64" @@ -89,6 +86,22 @@ architectureToDebianArchString X86_32 = "i386" architectureToDebianArchString ARMHF = "armhf" architectureToDebianArchString ARMEL = "armel" architectureToDebianArchString ANDROID = "android" +architectureToDebianArchString PPC = "powerpc" +architectureToDebianArchString PPC64 = "ppc64el" +architectureToDebianArchString SPARC = "sparc" +architectureToDebianArchString SPARC64 = "sparc64" +architectureToDebianArchString MIPS = "mips" +architectureToDebianArchString MIPSEL = "mipsel" +architectureToDebianArchString MIPS64EL = "mips64el" +architectureToDebianArchString SH4 = "sh" +architectureToDebianArchString IA64 = "ia64" +architectureToDebianArchString S390 = "s390" +architectureToDebianArchString S390X = "s390x" +architectureToDebianArchString ALPHA = "alpha" +architectureToDebianArchString HPPA = "hppa" +architectureToDebianArchString M68K = "m68k" +architectureToDebianArchString ARM64 = "arm64" +architectureToDebianArchString X32 = "x32" type UserName = String -- cgit v1.2.3