Commit 0a1b4810 authored by Duncan Coutts's avatar Duncan Coutts
Browse files

Add HaLVM OS

And add a TODO about future handling of OS variants like Android and iOS.
parent 6f01f56a
......@@ -58,16 +58,23 @@ data ClassificationStrictness = Permissive | Compat | Strict
-- * Operating System
-- ------------------------------------------------------------
data OS = Linux | Windows | OSX
| FreeBSD | OpenBSD | NetBSD
| Solaris | AIX | HPUX | IRIX
data OS = Linux | Windows | OSX -- teir 1 desktop OSs
| FreeBSD | OpenBSD | NetBSD -- other free unix OSs
| Solaris | AIX | HPUX | IRIX -- ageing Unix OSs
| HaLVM -- bare metal / VMs / hypervisors
| OtherOS String
deriving (Eq, Ord, Show, Read)
--TODO: decide how to handle Android and iOS.
-- They are like Linux and OSX but with some differences.
-- Should they be separate from linux/osx, or a subtype?
-- e.g. should we have os(linux) && os(android) true simultaneously?
knownOSs :: [OS]
knownOSs = [Linux, Windows, OSX
,FreeBSD, OpenBSD, NetBSD
,Solaris, AIX, HPUX, IRIX]
,Solaris, AIX, HPUX, IRIX
,HaLVM]
osAliases :: ClassificationStrictness -> OS -> [String]
osAliases Permissive Windows = ["mingw32", "cygwin32"]
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment