-- GENERATED by C->Haskell Compiler, version 0.17.2 Crystal Seed, 24 Jan 2009 (Haskell)
-- Edit the ORIGNAL .chs file instead!


{-# LINE 1 "./Graphics/Wayland/Internal/Version.chs" #-}
module Graphics.Wayland.Internal.Version (version) where



data VersionInt = MajorInt
                | MinorInt
                | MicroInt
                deriving (Eq,Ord)
instance Enum VersionInt where
  fromEnum MajorInt = 1
  fromEnum MinorInt = 5
  fromEnum MicroInt = 0

  toEnum 1 = MajorInt
  toEnum 5 = MinorInt
  toEnum 0 = MicroInt
  toEnum unmatched = error ("VersionInt.toEnum: Cannot match " ++ show unmatched)

{-# LINE 5 "./Graphics/Wayland/Internal/Version.chs" #-}


version = (fromEnum MajorInt, fromEnum MinorInt, fromEnum MicroInt)