{-# language CPP #-}
module Vulkan.Core10.Enums.SharingMode (SharingMode( SHARING_MODE_EXCLUSIVE
, SHARING_MODE_CONCURRENT
, ..
)) where
import Vulkan.Internal.Utils (enumReadPrec)
import Vulkan.Internal.Utils (enumShowsPrec)
import GHC.Show (showsPrec)
import Vulkan.Zero (Zero)
import Foreign.Storable (Storable)
import Data.Int (Int32)
import GHC.Read (Read(readPrec))
import GHC.Show (Show(showsPrec))
newtype SharingMode = SharingMode Int32
deriving newtype (SharingMode -> SharingMode -> Bool
(SharingMode -> SharingMode -> Bool)
-> (SharingMode -> SharingMode -> Bool) -> Eq SharingMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SharingMode -> SharingMode -> Bool
$c/= :: SharingMode -> SharingMode -> Bool
== :: SharingMode -> SharingMode -> Bool
$c== :: SharingMode -> SharingMode -> Bool
Eq, Eq SharingMode
Eq SharingMode =>
(SharingMode -> SharingMode -> Ordering)
-> (SharingMode -> SharingMode -> Bool)
-> (SharingMode -> SharingMode -> Bool)
-> (SharingMode -> SharingMode -> Bool)
-> (SharingMode -> SharingMode -> Bool)
-> (SharingMode -> SharingMode -> SharingMode)
-> (SharingMode -> SharingMode -> SharingMode)
-> Ord SharingMode
SharingMode -> SharingMode -> Bool
SharingMode -> SharingMode -> Ordering
SharingMode -> SharingMode -> SharingMode
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: SharingMode -> SharingMode -> SharingMode
$cmin :: SharingMode -> SharingMode -> SharingMode
max :: SharingMode -> SharingMode -> SharingMode
$cmax :: SharingMode -> SharingMode -> SharingMode
>= :: SharingMode -> SharingMode -> Bool
$c>= :: SharingMode -> SharingMode -> Bool
> :: SharingMode -> SharingMode -> Bool
$c> :: SharingMode -> SharingMode -> Bool
<= :: SharingMode -> SharingMode -> Bool
$c<= :: SharingMode -> SharingMode -> Bool
< :: SharingMode -> SharingMode -> Bool
$c< :: SharingMode -> SharingMode -> Bool
compare :: SharingMode -> SharingMode -> Ordering
$ccompare :: SharingMode -> SharingMode -> Ordering
$cp1Ord :: Eq SharingMode
Ord, Ptr b -> Int -> IO SharingMode
Ptr b -> Int -> SharingMode -> IO ()
Ptr SharingMode -> IO SharingMode
Ptr SharingMode -> Int -> IO SharingMode
Ptr SharingMode -> Int -> SharingMode -> IO ()
Ptr SharingMode -> SharingMode -> IO ()
SharingMode -> Int
(SharingMode -> Int)
-> (SharingMode -> Int)
-> (Ptr SharingMode -> Int -> IO SharingMode)
-> (Ptr SharingMode -> Int -> SharingMode -> IO ())
-> (forall b. Ptr b -> Int -> IO SharingMode)
-> (forall b. Ptr b -> Int -> SharingMode -> IO ())
-> (Ptr SharingMode -> IO SharingMode)
-> (Ptr SharingMode -> SharingMode -> IO ())
-> Storable SharingMode
forall b. Ptr b -> Int -> IO SharingMode
forall b. Ptr b -> Int -> SharingMode -> IO ()
forall a.
(a -> Int)
-> (a -> Int)
-> (Ptr a -> Int -> IO a)
-> (Ptr a -> Int -> a -> IO ())
-> (forall b. Ptr b -> Int -> IO a)
-> (forall b. Ptr b -> Int -> a -> IO ())
-> (Ptr a -> IO a)
-> (Ptr a -> a -> IO ())
-> Storable a
poke :: Ptr SharingMode -> SharingMode -> IO ()
$cpoke :: Ptr SharingMode -> SharingMode -> IO ()
peek :: Ptr SharingMode -> IO SharingMode
$cpeek :: Ptr SharingMode -> IO SharingMode
pokeByteOff :: Ptr b -> Int -> SharingMode -> IO ()
$cpokeByteOff :: forall b. Ptr b -> Int -> SharingMode -> IO ()
peekByteOff :: Ptr b -> Int -> IO SharingMode
$cpeekByteOff :: forall b. Ptr b -> Int -> IO SharingMode
pokeElemOff :: Ptr SharingMode -> Int -> SharingMode -> IO ()
$cpokeElemOff :: Ptr SharingMode -> Int -> SharingMode -> IO ()
peekElemOff :: Ptr SharingMode -> Int -> IO SharingMode
$cpeekElemOff :: Ptr SharingMode -> Int -> IO SharingMode
alignment :: SharingMode -> Int
$calignment :: SharingMode -> Int
sizeOf :: SharingMode -> Int
$csizeOf :: SharingMode -> Int
Storable, SharingMode
SharingMode -> Zero SharingMode
forall a. a -> Zero a
zero :: SharingMode
$czero :: SharingMode
Zero)
pattern $bSHARING_MODE_EXCLUSIVE :: SharingMode
$mSHARING_MODE_EXCLUSIVE :: forall r. SharingMode -> (Void# -> r) -> (Void# -> r) -> r
SHARING_MODE_EXCLUSIVE = SharingMode 0
pattern $bSHARING_MODE_CONCURRENT :: SharingMode
$mSHARING_MODE_CONCURRENT :: forall r. SharingMode -> (Void# -> r) -> (Void# -> r) -> r
SHARING_MODE_CONCURRENT = SharingMode 1
{-# complete SHARING_MODE_EXCLUSIVE,
SHARING_MODE_CONCURRENT :: SharingMode #-}
conNameSharingMode :: String
conNameSharingMode :: String
conNameSharingMode = "SharingMode"
enumPrefixSharingMode :: String
enumPrefixSharingMode :: String
enumPrefixSharingMode = "SHARING_MODE_"
showTableSharingMode :: [(SharingMode, String)]
showTableSharingMode :: [(SharingMode, String)]
showTableSharingMode = [(SharingMode
SHARING_MODE_EXCLUSIVE, "EXCLUSIVE"), (SharingMode
SHARING_MODE_CONCURRENT, "CONCURRENT")]
instance Show SharingMode where
showsPrec :: Int -> SharingMode -> ShowS
showsPrec =
String
-> [(SharingMode, String)]
-> String
-> (SharingMode -> Int32)
-> (Int32 -> ShowS)
-> Int
-> SharingMode
-> ShowS
forall a i.
Eq a =>
String
-> [(a, String)]
-> String
-> (a -> i)
-> (i -> ShowS)
-> Int
-> a
-> ShowS
enumShowsPrec String
enumPrefixSharingMode [(SharingMode, String)]
showTableSharingMode String
conNameSharingMode (\(SharingMode x :: Int32
x) -> Int32
x) (Int -> Int32 -> ShowS
forall a. Show a => Int -> a -> ShowS
showsPrec 11)
instance Read SharingMode where
readPrec :: ReadPrec SharingMode
readPrec = String
-> [(SharingMode, String)]
-> String
-> (Int32 -> SharingMode)
-> ReadPrec SharingMode
forall i a.
Read i =>
String -> [(a, String)] -> String -> (i -> a) -> ReadPrec a
enumReadPrec String
enumPrefixSharingMode [(SharingMode, String)]
showTableSharingMode String
conNameSharingMode Int32 -> SharingMode
SharingMode