{-# OPTIONS -XEmptyDataDecls #-}
module NET.System.Runtime.Serialization.StreamingContextStates.Type ( module NET.System.Runtime.Serialization.StreamingContextStates.Type ) where

import NET
import qualified NET.System.Type
import qualified NET.System.Enum
import qualified NET.System.IComparable
import qualified NET.System.IFormattable
import qualified NET.System.IConvertible

data StreamingContextStates_ a
instance NET.System.IComparable.IComparable (StreamingContextStates_ a) where
  instanceName_IComparable _ = "NET.System.Runtime.Serialization.StreamingContextStates.StreamingContextStates"

instance NET.System.IFormattable.IFormattable (StreamingContextStates_ a) where
  instanceName_IFormattable _ = "NET.System.Runtime.Serialization.StreamingContextStates.StreamingContextStates"

instance NET.System.IConvertible.IConvertible (StreamingContextStates_ a) where
  instanceName_IConvertible _ = "NET.System.Runtime.Serialization.StreamingContextStates.StreamingContextStates"

type StreamingContextStates a = Int
data StreamingContextStatesTy
 = CrossProcess
 | CrossMachine
 | File
 | Persistence
 | Remoting
 | Other
 | Clone
 | CrossAppDomain
 | All
  deriving ( Enum, Show, Read )
toStreamingContextStates :: StreamingContextStatesTy -> StreamingContextStates ()
toStreamingContextStates tag = fromEnum tag

fromStreamingContextStates :: StreamingContextStates () -> StreamingContextStatesTy
fromStreamingContextStates obj = toEnum obj