{-# OPTIONS -XEmptyDataDecls #-}
module NET.System.DateTimeKind where

import NET
import qualified System.IO.Unsafe
import qualified NET.System.Type
import qualified NET.System.Enum

data DateTimeKind_ a
type DateTimeKind a = NET.System.Enum.Enum (DateTimeKind_ a)

data DateTimeKindTy
 = Unspecified
 | Utc
 | Local
  deriving ( Enum, Show, Read )
toDateTimeKind :: DateTimeKindTy -> DateTimeKind ()
toDateTimeKind tag = System.IO.Unsafe.unsafePerformIO (NET.System.Enum.parse (System.IO.Unsafe.unsafePerformIO (NET.System.Type.getType "System.DateTimeKind, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089")) (show tag))

fromDateTimeKind :: DateTimeKind () -> DateTimeKindTy
fromDateTimeKind obj = read (show obj)