[commit: Cabal] master: Add HaLVM OS (0a1b481)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/0a1b4810c55c90de5ef613944ee6ea09a3b521c3

>---------------------------------------------------------------

commit 0a1b4810c55c90de5ef613944ee6ea09a3b521c3
Author: Duncan Coutts <duncan at community.haskell.org>
Date:   Tue May 24 18:39:46 2011 +0000

    Add HaLVM OS
    And add a TODO about future handling of OS variants like Android and iOS.

>---------------------------------------------------------------

 Distribution/System.hs |   15 +++++++++++----
 1 files changed, 11 insertions(+), 4 deletions(-)

diff --git a/Distribution/System.hs b/Distribution/System.hs
index 144a54e..519d76a 100644
--- a/Distribution/System.hs
+++ b/Distribution/System.hs
@@ -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"]