archAliases :: ClassificationStrictness -> Arch -> [String]
archAliases Strict _     = []
archAliases :: ClassificationStrictness -> Arch -> [String]
archAliases Strict _     = []
archAliases Strict _     = []