{-# OPTIONS_HADDOCK ignore-exports#-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE KindSignatures #-} {-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE Strict #-} {-# LANGUAGE TypeSynonymInstances #-} module Graphics.Vulkan.Types.Enum.RenderPassCreateFlags (VkRenderPassCreateBitmask(VkRenderPassCreateBitmask, VkRenderPassCreateFlags, VkRenderPassCreateFlagBits), VkRenderPassCreateFlags, VkRenderPassCreateFlagBits) where import Data.Bits (Bits, FiniteBits) import Foreign.Storable (Storable) import GHC.Read (choose, expectP) import Graphics.Vulkan.Marshal (FlagBit, FlagMask, FlagType) import Graphics.Vulkan.Types.BaseTypes (VkFlags (..)) import Text.ParserCombinators.ReadPrec (prec, step, (+++)) import Text.Read (Read (..), parens) import Text.Read.Lex (Lexeme (..)) newtype VkRenderPassCreateBitmask (a :: FlagType) = VkRenderPassCreateBitmask VkFlags deriving (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool) -> (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool) -> Eq (VkRenderPassCreateBitmask a) forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool /= :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool $c/= :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool == :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool $c== :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool Eq, Eq (VkRenderPassCreateBitmask a) Eq (VkRenderPassCreateBitmask a) -> (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Ordering) -> (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool) -> (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool) -> (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool) -> (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool) -> (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a) -> (VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a) -> Ord (VkRenderPassCreateBitmask a) VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Ordering VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a 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 forall (a :: FlagType). Eq (VkRenderPassCreateBitmask a) forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Ordering forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a min :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a $cmin :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a max :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a $cmax :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a >= :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool $c>= :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool > :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool $c> :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool <= :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool $c<= :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool < :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool $c< :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Bool compare :: VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Ordering $ccompare :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> VkRenderPassCreateBitmask a -> Ordering Ord, Ptr (VkRenderPassCreateBitmask a) -> IO (VkRenderPassCreateBitmask a) Ptr (VkRenderPassCreateBitmask a) -> Int -> IO (VkRenderPassCreateBitmask a) Ptr (VkRenderPassCreateBitmask a) -> Int -> VkRenderPassCreateBitmask a -> IO () Ptr (VkRenderPassCreateBitmask a) -> VkRenderPassCreateBitmask a -> IO () VkRenderPassCreateBitmask a -> Int (VkRenderPassCreateBitmask a -> Int) -> (VkRenderPassCreateBitmask a -> Int) -> (Ptr (VkRenderPassCreateBitmask a) -> Int -> IO (VkRenderPassCreateBitmask a)) -> (Ptr (VkRenderPassCreateBitmask a) -> Int -> VkRenderPassCreateBitmask a -> IO ()) -> (forall b. Ptr b -> Int -> IO (VkRenderPassCreateBitmask a)) -> (forall b. Ptr b -> Int -> VkRenderPassCreateBitmask a -> IO ()) -> (Ptr (VkRenderPassCreateBitmask a) -> IO (VkRenderPassCreateBitmask a)) -> (Ptr (VkRenderPassCreateBitmask a) -> VkRenderPassCreateBitmask a -> IO ()) -> Storable (VkRenderPassCreateBitmask a) forall b. Ptr b -> Int -> IO (VkRenderPassCreateBitmask a) forall b. Ptr b -> Int -> VkRenderPassCreateBitmask a -> 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 forall (a :: FlagType). Ptr (VkRenderPassCreateBitmask a) -> IO (VkRenderPassCreateBitmask a) forall (a :: FlagType). Ptr (VkRenderPassCreateBitmask a) -> Int -> IO (VkRenderPassCreateBitmask a) forall (a :: FlagType). Ptr (VkRenderPassCreateBitmask a) -> Int -> VkRenderPassCreateBitmask a -> IO () forall (a :: FlagType). Ptr (VkRenderPassCreateBitmask a) -> VkRenderPassCreateBitmask a -> IO () forall (a :: FlagType). VkRenderPassCreateBitmask a -> Int forall (a :: FlagType) b. Ptr b -> Int -> IO (VkRenderPassCreateBitmask a) forall (a :: FlagType) b. Ptr b -> Int -> VkRenderPassCreateBitmask a -> IO () poke :: Ptr (VkRenderPassCreateBitmask a) -> VkRenderPassCreateBitmask a -> IO () $cpoke :: forall (a :: FlagType). Ptr (VkRenderPassCreateBitmask a) -> VkRenderPassCreateBitmask a -> IO () peek :: Ptr (VkRenderPassCreateBitmask a) -> IO (VkRenderPassCreateBitmask a) $cpeek :: forall (a :: FlagType). Ptr (VkRenderPassCreateBitmask a) -> IO (VkRenderPassCreateBitmask a) pokeByteOff :: forall b. Ptr b -> Int -> VkRenderPassCreateBitmask a -> IO () $cpokeByteOff :: forall (a :: FlagType) b. Ptr b -> Int -> VkRenderPassCreateBitmask a -> IO () peekByteOff :: forall b. Ptr b -> Int -> IO (VkRenderPassCreateBitmask a) $cpeekByteOff :: forall (a :: FlagType) b. Ptr b -> Int -> IO (VkRenderPassCreateBitmask a) pokeElemOff :: Ptr (VkRenderPassCreateBitmask a) -> Int -> VkRenderPassCreateBitmask a -> IO () $cpokeElemOff :: forall (a :: FlagType). Ptr (VkRenderPassCreateBitmask a) -> Int -> VkRenderPassCreateBitmask a -> IO () peekElemOff :: Ptr (VkRenderPassCreateBitmask a) -> Int -> IO (VkRenderPassCreateBitmask a) $cpeekElemOff :: forall (a :: FlagType). Ptr (VkRenderPassCreateBitmask a) -> Int -> IO (VkRenderPassCreateBitmask a) alignment :: VkRenderPassCreateBitmask a -> Int $calignment :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> Int sizeOf :: VkRenderPassCreateBitmask a -> Int $csizeOf :: forall (a :: FlagType). VkRenderPassCreateBitmask a -> Int Storable) type VkRenderPassCreateFlags = VkRenderPassCreateBitmask FlagMask type VkRenderPassCreateFlagBits = VkRenderPassCreateBitmask FlagBit pattern VkRenderPassCreateFlagBits :: VkFlags -> VkRenderPassCreateBitmask FlagBit pattern $bVkRenderPassCreateFlagBits :: VkFlags -> VkRenderPassCreateBitmask FlagBit $mVkRenderPassCreateFlagBits :: forall {r}. VkRenderPassCreateBitmask FlagBit -> (VkFlags -> r) -> (Void# -> r) -> r VkRenderPassCreateFlagBits n = VkRenderPassCreateBitmask n pattern VkRenderPassCreateFlags :: VkFlags -> VkRenderPassCreateBitmask FlagMask pattern $bVkRenderPassCreateFlags :: VkFlags -> VkRenderPassCreateBitmask FlagMask $mVkRenderPassCreateFlags :: forall {r}. VkRenderPassCreateBitmask FlagMask -> (VkFlags -> r) -> (Void# -> r) -> r VkRenderPassCreateFlags n = VkRenderPassCreateBitmask n deriving instance Bits (VkRenderPassCreateBitmask FlagMask) deriving instance FiniteBits (VkRenderPassCreateBitmask FlagMask) instance Show (VkRenderPassCreateBitmask a) where showsPrec :: Int -> VkRenderPassCreateBitmask a -> ShowS showsPrec Int p (VkRenderPassCreateBitmask VkFlags x) = Bool -> ShowS -> ShowS showParen (Int p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (String -> ShowS showString String "VkRenderPassCreateBitmask " ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Int -> VkFlags -> ShowS forall a. Show a => Int -> a -> ShowS showsPrec Int 11 VkFlags x) instance Read (VkRenderPassCreateBitmask a) where readPrec :: ReadPrec (VkRenderPassCreateBitmask a) readPrec = ReadPrec (VkRenderPassCreateBitmask a) -> ReadPrec (VkRenderPassCreateBitmask a) forall a. ReadPrec a -> ReadPrec a parens ([(String, ReadPrec (VkRenderPassCreateBitmask a))] -> ReadPrec (VkRenderPassCreateBitmask a) forall a. [(String, ReadPrec a)] -> ReadPrec a choose [] ReadPrec (VkRenderPassCreateBitmask a) -> ReadPrec (VkRenderPassCreateBitmask a) -> ReadPrec (VkRenderPassCreateBitmask a) forall a. ReadPrec a -> ReadPrec a -> ReadPrec a +++ Int -> ReadPrec (VkRenderPassCreateBitmask a) -> ReadPrec (VkRenderPassCreateBitmask a) forall a. Int -> ReadPrec a -> ReadPrec a prec Int 10 (Lexeme -> ReadPrec () expectP (String -> Lexeme Ident String "VkRenderPassCreateBitmask") ReadPrec () -> ReadPrec (VkRenderPassCreateBitmask a) -> ReadPrec (VkRenderPassCreateBitmask a) forall (m :: * -> *) a b. Monad m => m a -> m b -> m b >> (VkFlags -> VkRenderPassCreateBitmask a forall (a :: FlagType). VkFlags -> VkRenderPassCreateBitmask a VkRenderPassCreateBitmask (VkFlags -> VkRenderPassCreateBitmask a) -> ReadPrec VkFlags -> ReadPrec (VkRenderPassCreateBitmask a) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> ReadPrec VkFlags -> ReadPrec VkFlags forall a. ReadPrec a -> ReadPrec a step ReadPrec VkFlags forall a. Read a => ReadPrec a readPrec)))