{-# language CPP #-}
module Vulkan.Core10.Enums.ColorComponentFlagBits ( ColorComponentFlags
, ColorComponentFlagBits( COLOR_COMPONENT_R_BIT
, COLOR_COMPONENT_G_BIT
, COLOR_COMPONENT_B_BIT
, COLOR_COMPONENT_A_BIT
, ..
)
) where
import Vulkan.Internal.Utils (enumReadPrec)
import Vulkan.Internal.Utils (enumShowsPrec)
import GHC.Show (showString)
import Numeric (showHex)
import Vulkan.Zero (Zero)
import Data.Bits (Bits)
import Data.Bits (FiniteBits)
import Foreign.Storable (Storable)
import GHC.Read (Read(readPrec))
import GHC.Show (Show(showsPrec))
import Vulkan.Core10.FundamentalTypes (Flags)
type ColorComponentFlags = ColorComponentFlagBits
newtype ColorComponentFlagBits = ColorComponentFlagBits Flags
deriving newtype (ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
(ColorComponentFlagBits -> ColorComponentFlagBits -> Bool)
-> (ColorComponentFlagBits -> ColorComponentFlagBits -> Bool)
-> Eq ColorComponentFlagBits
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
$c/= :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
== :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
$c== :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
Eq, Eq ColorComponentFlagBits
Eq ColorComponentFlagBits
-> (ColorComponentFlagBits -> ColorComponentFlagBits -> Ordering)
-> (ColorComponentFlagBits -> ColorComponentFlagBits -> Bool)
-> (ColorComponentFlagBits -> ColorComponentFlagBits -> Bool)
-> (ColorComponentFlagBits -> ColorComponentFlagBits -> Bool)
-> (ColorComponentFlagBits -> ColorComponentFlagBits -> Bool)
-> (ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits)
-> (ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits)
-> Ord ColorComponentFlagBits
ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
ColorComponentFlagBits -> ColorComponentFlagBits -> Ordering
ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
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 :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
$cmin :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
max :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
$cmax :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
>= :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
$c>= :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
> :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
$c> :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
<= :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
$c<= :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
< :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
$c< :: ColorComponentFlagBits -> ColorComponentFlagBits -> Bool
compare :: ColorComponentFlagBits -> ColorComponentFlagBits -> Ordering
$ccompare :: ColorComponentFlagBits -> ColorComponentFlagBits -> Ordering
$cp1Ord :: Eq ColorComponentFlagBits
Ord, Ptr b -> Int -> IO ColorComponentFlagBits
Ptr b -> Int -> ColorComponentFlagBits -> IO ()
Ptr ColorComponentFlagBits -> IO ColorComponentFlagBits
Ptr ColorComponentFlagBits -> Int -> IO ColorComponentFlagBits
Ptr ColorComponentFlagBits
-> Int -> ColorComponentFlagBits -> IO ()
Ptr ColorComponentFlagBits -> ColorComponentFlagBits -> IO ()
ColorComponentFlagBits -> Int
(ColorComponentFlagBits -> Int)
-> (ColorComponentFlagBits -> Int)
-> (Ptr ColorComponentFlagBits -> Int -> IO ColorComponentFlagBits)
-> (Ptr ColorComponentFlagBits
-> Int -> ColorComponentFlagBits -> IO ())
-> (forall b. Ptr b -> Int -> IO ColorComponentFlagBits)
-> (forall b. Ptr b -> Int -> ColorComponentFlagBits -> IO ())
-> (Ptr ColorComponentFlagBits -> IO ColorComponentFlagBits)
-> (Ptr ColorComponentFlagBits -> ColorComponentFlagBits -> IO ())
-> Storable ColorComponentFlagBits
forall b. Ptr b -> Int -> IO ColorComponentFlagBits
forall b. Ptr b -> Int -> ColorComponentFlagBits -> 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 ColorComponentFlagBits -> ColorComponentFlagBits -> IO ()
$cpoke :: Ptr ColorComponentFlagBits -> ColorComponentFlagBits -> IO ()
peek :: Ptr ColorComponentFlagBits -> IO ColorComponentFlagBits
$cpeek :: Ptr ColorComponentFlagBits -> IO ColorComponentFlagBits
pokeByteOff :: Ptr b -> Int -> ColorComponentFlagBits -> IO ()
$cpokeByteOff :: forall b. Ptr b -> Int -> ColorComponentFlagBits -> IO ()
peekByteOff :: Ptr b -> Int -> IO ColorComponentFlagBits
$cpeekByteOff :: forall b. Ptr b -> Int -> IO ColorComponentFlagBits
pokeElemOff :: Ptr ColorComponentFlagBits
-> Int -> ColorComponentFlagBits -> IO ()
$cpokeElemOff :: Ptr ColorComponentFlagBits
-> Int -> ColorComponentFlagBits -> IO ()
peekElemOff :: Ptr ColorComponentFlagBits -> Int -> IO ColorComponentFlagBits
$cpeekElemOff :: Ptr ColorComponentFlagBits -> Int -> IO ColorComponentFlagBits
alignment :: ColorComponentFlagBits -> Int
$calignment :: ColorComponentFlagBits -> Int
sizeOf :: ColorComponentFlagBits -> Int
$csizeOf :: ColorComponentFlagBits -> Int
Storable, ColorComponentFlagBits
ColorComponentFlagBits -> Zero ColorComponentFlagBits
forall a. a -> Zero a
zero :: ColorComponentFlagBits
$czero :: ColorComponentFlagBits
Zero, Eq ColorComponentFlagBits
ColorComponentFlagBits
Eq ColorComponentFlagBits
-> (ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits)
-> (ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits)
-> (ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> ColorComponentFlagBits
-> (Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> Bool)
-> (ColorComponentFlagBits -> Maybe Int)
-> (ColorComponentFlagBits -> Int)
-> (ColorComponentFlagBits -> Bool)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int -> ColorComponentFlagBits)
-> (ColorComponentFlagBits -> Int)
-> Bits ColorComponentFlagBits
Int -> ColorComponentFlagBits
ColorComponentFlagBits -> Bool
ColorComponentFlagBits -> Int
ColorComponentFlagBits -> Maybe Int
ColorComponentFlagBits -> ColorComponentFlagBits
ColorComponentFlagBits -> Int -> Bool
ColorComponentFlagBits -> Int -> ColorComponentFlagBits
ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
forall a.
Eq a
-> (a -> a -> a)
-> (a -> a -> a)
-> (a -> a -> a)
-> (a -> a)
-> (a -> Int -> a)
-> (a -> Int -> a)
-> a
-> (Int -> a)
-> (a -> Int -> a)
-> (a -> Int -> a)
-> (a -> Int -> a)
-> (a -> Int -> Bool)
-> (a -> Maybe Int)
-> (a -> Int)
-> (a -> Bool)
-> (a -> Int -> a)
-> (a -> Int -> a)
-> (a -> Int -> a)
-> (a -> Int -> a)
-> (a -> Int -> a)
-> (a -> Int -> a)
-> (a -> Int)
-> Bits a
popCount :: ColorComponentFlagBits -> Int
$cpopCount :: ColorComponentFlagBits -> Int
rotateR :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$crotateR :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
rotateL :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$crotateL :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
unsafeShiftR :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$cunsafeShiftR :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
shiftR :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$cshiftR :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
unsafeShiftL :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$cunsafeShiftL :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
shiftL :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$cshiftL :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
isSigned :: ColorComponentFlagBits -> Bool
$cisSigned :: ColorComponentFlagBits -> Bool
bitSize :: ColorComponentFlagBits -> Int
$cbitSize :: ColorComponentFlagBits -> Int
bitSizeMaybe :: ColorComponentFlagBits -> Maybe Int
$cbitSizeMaybe :: ColorComponentFlagBits -> Maybe Int
testBit :: ColorComponentFlagBits -> Int -> Bool
$ctestBit :: ColorComponentFlagBits -> Int -> Bool
complementBit :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$ccomplementBit :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
clearBit :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$cclearBit :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
setBit :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$csetBit :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
bit :: Int -> ColorComponentFlagBits
$cbit :: Int -> ColorComponentFlagBits
zeroBits :: ColorComponentFlagBits
$czeroBits :: ColorComponentFlagBits
rotate :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$crotate :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
shift :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
$cshift :: ColorComponentFlagBits -> Int -> ColorComponentFlagBits
complement :: ColorComponentFlagBits -> ColorComponentFlagBits
$ccomplement :: ColorComponentFlagBits -> ColorComponentFlagBits
xor :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
$cxor :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
.|. :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
$c.|. :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
.&. :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
$c.&. :: ColorComponentFlagBits
-> ColorComponentFlagBits -> ColorComponentFlagBits
$cp1Bits :: Eq ColorComponentFlagBits
Bits, Bits ColorComponentFlagBits
Bits ColorComponentFlagBits
-> (ColorComponentFlagBits -> Int)
-> (ColorComponentFlagBits -> Int)
-> (ColorComponentFlagBits -> Int)
-> FiniteBits ColorComponentFlagBits
ColorComponentFlagBits -> Int
forall b.
Bits b -> (b -> Int) -> (b -> Int) -> (b -> Int) -> FiniteBits b
countTrailingZeros :: ColorComponentFlagBits -> Int
$ccountTrailingZeros :: ColorComponentFlagBits -> Int
countLeadingZeros :: ColorComponentFlagBits -> Int
$ccountLeadingZeros :: ColorComponentFlagBits -> Int
finiteBitSize :: ColorComponentFlagBits -> Int
$cfiniteBitSize :: ColorComponentFlagBits -> Int
$cp1FiniteBits :: Bits ColorComponentFlagBits
FiniteBits)
pattern $bCOLOR_COMPONENT_R_BIT :: ColorComponentFlagBits
$mCOLOR_COMPONENT_R_BIT :: forall r.
ColorComponentFlagBits -> (Void# -> r) -> (Void# -> r) -> r
COLOR_COMPONENT_R_BIT = ColorComponentFlagBits 0x00000001
pattern $bCOLOR_COMPONENT_G_BIT :: ColorComponentFlagBits
$mCOLOR_COMPONENT_G_BIT :: forall r.
ColorComponentFlagBits -> (Void# -> r) -> (Void# -> r) -> r
COLOR_COMPONENT_G_BIT = ColorComponentFlagBits 0x00000002
pattern $bCOLOR_COMPONENT_B_BIT :: ColorComponentFlagBits
$mCOLOR_COMPONENT_B_BIT :: forall r.
ColorComponentFlagBits -> (Void# -> r) -> (Void# -> r) -> r
COLOR_COMPONENT_B_BIT = ColorComponentFlagBits 0x00000004
pattern $bCOLOR_COMPONENT_A_BIT :: ColorComponentFlagBits
$mCOLOR_COMPONENT_A_BIT :: forall r.
ColorComponentFlagBits -> (Void# -> r) -> (Void# -> r) -> r
COLOR_COMPONENT_A_BIT = ColorComponentFlagBits 0x00000008
conNameColorComponentFlagBits :: String
conNameColorComponentFlagBits :: String
conNameColorComponentFlagBits = String
"ColorComponentFlagBits"
enumPrefixColorComponentFlagBits :: String
enumPrefixColorComponentFlagBits :: String
enumPrefixColorComponentFlagBits = String
"COLOR_COMPONENT_"
showTableColorComponentFlagBits :: [(ColorComponentFlagBits, String)]
showTableColorComponentFlagBits :: [(ColorComponentFlagBits, String)]
showTableColorComponentFlagBits =
[ (ColorComponentFlagBits
COLOR_COMPONENT_R_BIT, String
"R_BIT")
, (ColorComponentFlagBits
COLOR_COMPONENT_G_BIT, String
"G_BIT")
, (ColorComponentFlagBits
COLOR_COMPONENT_B_BIT, String
"B_BIT")
, (ColorComponentFlagBits
COLOR_COMPONENT_A_BIT, String
"A_BIT")
]
instance Show ColorComponentFlagBits where
showsPrec :: Int -> ColorComponentFlagBits -> ShowS
showsPrec = String
-> [(ColorComponentFlagBits, String)]
-> String
-> (ColorComponentFlagBits -> Flags)
-> (Flags -> ShowS)
-> Int
-> ColorComponentFlagBits
-> ShowS
forall a i.
Eq a =>
String
-> [(a, String)]
-> String
-> (a -> i)
-> (i -> ShowS)
-> Int
-> a
-> ShowS
enumShowsPrec String
enumPrefixColorComponentFlagBits
[(ColorComponentFlagBits, String)]
showTableColorComponentFlagBits
String
conNameColorComponentFlagBits
(\(ColorComponentFlagBits Flags
x) -> Flags
x)
(\Flags
x -> String -> ShowS
showString String
"0x" ShowS -> ShowS -> ShowS
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Flags -> ShowS
forall a. (Integral a, Show a) => a -> ShowS
showHex Flags
x)
instance Read ColorComponentFlagBits where
readPrec :: ReadPrec ColorComponentFlagBits
readPrec = String
-> [(ColorComponentFlagBits, String)]
-> String
-> (Flags -> ColorComponentFlagBits)
-> ReadPrec ColorComponentFlagBits
forall i a.
Read i =>
String -> [(a, String)] -> String -> (i -> a) -> ReadPrec a
enumReadPrec String
enumPrefixColorComponentFlagBits
[(ColorComponentFlagBits, String)]
showTableColorComponentFlagBits
String
conNameColorComponentFlagBits
Flags -> ColorComponentFlagBits
ColorComponentFlagBits