{-# 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.Image
(VkImageAspectBitmask(VkImageAspectBitmask, VkImageAspectFlags,
VkImageAspectFlagBits, VK_IMAGE_ASPECT_COLOR_BIT,
VK_IMAGE_ASPECT_DEPTH_BIT, VK_IMAGE_ASPECT_STENCIL_BIT,
VK_IMAGE_ASPECT_METADATA_BIT),
VkImageAspectFlags, VkImageAspectFlagBits,
VkImageCreateBitmask(VkImageCreateBitmask, VkImageCreateFlags,
VkImageCreateFlagBits, VK_IMAGE_CREATE_SPARSE_BINDING_BIT,
VK_IMAGE_CREATE_SPARSE_RESIDENCY_BIT,
VK_IMAGE_CREATE_SPARSE_ALIASED_BIT,
VK_IMAGE_CREATE_MUTABLE_FORMAT_BIT,
VK_IMAGE_CREATE_CUBE_COMPATIBLE_BIT),
VkImageCreateFlags, VkImageCreateFlagBits,
VkImageLayout(VkImageLayout, VK_IMAGE_LAYOUT_UNDEFINED,
VK_IMAGE_LAYOUT_GENERAL, VK_IMAGE_LAYOUT_COLOR_ATTACHMENT_OPTIMAL,
VK_IMAGE_LAYOUT_DEPTH_STENCIL_ATTACHMENT_OPTIMAL,
VK_IMAGE_LAYOUT_DEPTH_STENCIL_READ_ONLY_OPTIMAL,
VK_IMAGE_LAYOUT_SHADER_READ_ONLY_OPTIMAL,
VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL,
VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL,
VK_IMAGE_LAYOUT_PREINITIALIZED),
VkImageTiling(VkImageTiling, VK_IMAGE_TILING_OPTIMAL,
VK_IMAGE_TILING_LINEAR),
VkImageType(VkImageType, VK_IMAGE_TYPE_1D, VK_IMAGE_TYPE_2D,
VK_IMAGE_TYPE_3D),
VkImageUsageBitmask(VkImageUsageBitmask, VkImageUsageFlags,
VkImageUsageFlagBits, VK_IMAGE_USAGE_TRANSFER_SRC_BIT,
VK_IMAGE_USAGE_TRANSFER_DST_BIT, VK_IMAGE_USAGE_SAMPLED_BIT,
VK_IMAGE_USAGE_STORAGE_BIT, VK_IMAGE_USAGE_COLOR_ATTACHMENT_BIT,
VK_IMAGE_USAGE_DEPTH_STENCIL_ATTACHMENT_BIT,
VK_IMAGE_USAGE_TRANSIENT_ATTACHMENT_BIT,
VK_IMAGE_USAGE_INPUT_ATTACHMENT_BIT),
VkImageUsageFlags, VkImageUsageFlagBits,
VkImageViewType(VkImageViewType, VK_IMAGE_VIEW_TYPE_1D,
VK_IMAGE_VIEW_TYPE_2D, VK_IMAGE_VIEW_TYPE_3D,
VK_IMAGE_VIEW_TYPE_CUBE, VK_IMAGE_VIEW_TYPE_1D_ARRAY,
VK_IMAGE_VIEW_TYPE_2D_ARRAY, VK_IMAGE_VIEW_TYPE_CUBE_ARRAY))
where
import Data.Bits (Bits, FiniteBits)
import Foreign.Storable (Storable)
import GHC.Read (choose, expectP)
import Graphics.Vulkan.Marshal (FlagBit, FlagMask, FlagType, Int32)
import Graphics.Vulkan.Types.BaseTypes (VkFlags (..))
import Text.ParserCombinators.ReadPrec (prec, step, (+++))
import Text.Read (Read (..), parens)
import Text.Read.Lex (Lexeme (..))
newtype VkImageAspectBitmask (a ::
FlagType) = VkImageAspectBitmask VkFlags
deriving (Eq, Ord, Storable)
type VkImageAspectFlags = VkImageAspectBitmask FlagMask
type VkImageAspectFlagBits = VkImageAspectBitmask FlagBit
pattern VkImageAspectFlagBits ::
VkFlags -> VkImageAspectBitmask FlagBit
pattern VkImageAspectFlagBits n = VkImageAspectBitmask n
pattern VkImageAspectFlags ::
VkFlags -> VkImageAspectBitmask FlagMask
pattern VkImageAspectFlags n = VkImageAspectBitmask n
deriving instance Bits (VkImageAspectBitmask FlagMask)
deriving instance FiniteBits (VkImageAspectBitmask FlagMask)
instance Show (VkImageAspectBitmask a) where
showsPrec _ VK_IMAGE_ASPECT_COLOR_BIT
= showString "VK_IMAGE_ASPECT_COLOR_BIT"
showsPrec _ VK_IMAGE_ASPECT_DEPTH_BIT
= showString "VK_IMAGE_ASPECT_DEPTH_BIT"
showsPrec _ VK_IMAGE_ASPECT_STENCIL_BIT
= showString "VK_IMAGE_ASPECT_STENCIL_BIT"
showsPrec _ VK_IMAGE_ASPECT_METADATA_BIT
= showString "VK_IMAGE_ASPECT_METADATA_BIT"
showsPrec p (VkImageAspectBitmask x)
= showParen (p >= 11)
(showString "VkImageAspectBitmask " . showsPrec 11 x)
instance Read (VkImageAspectBitmask a) where
readPrec
= parens
(choose
[("VK_IMAGE_ASPECT_COLOR_BIT", pure VK_IMAGE_ASPECT_COLOR_BIT),
("VK_IMAGE_ASPECT_DEPTH_BIT", pure VK_IMAGE_ASPECT_DEPTH_BIT),
("VK_IMAGE_ASPECT_STENCIL_BIT", pure VK_IMAGE_ASPECT_STENCIL_BIT),
("VK_IMAGE_ASPECT_METADATA_BIT",
pure VK_IMAGE_ASPECT_METADATA_BIT)]
+++
prec 10
(expectP (Ident "VkImageAspectBitmask") >>
(VkImageAspectBitmask <$> step readPrec)))
pattern VK_IMAGE_ASPECT_COLOR_BIT :: VkImageAspectBitmask a
pattern VK_IMAGE_ASPECT_COLOR_BIT = VkImageAspectBitmask 1
pattern VK_IMAGE_ASPECT_DEPTH_BIT :: VkImageAspectBitmask a
pattern VK_IMAGE_ASPECT_DEPTH_BIT = VkImageAspectBitmask 2
pattern VK_IMAGE_ASPECT_STENCIL_BIT :: VkImageAspectBitmask a
pattern VK_IMAGE_ASPECT_STENCIL_BIT = VkImageAspectBitmask 4
pattern VK_IMAGE_ASPECT_METADATA_BIT :: VkImageAspectBitmask a
pattern VK_IMAGE_ASPECT_METADATA_BIT = VkImageAspectBitmask 8
newtype VkImageCreateBitmask (a ::
FlagType) = VkImageCreateBitmask VkFlags
deriving (Eq, Ord, Storable)
type VkImageCreateFlags = VkImageCreateBitmask FlagMask
type VkImageCreateFlagBits = VkImageCreateBitmask FlagBit
pattern VkImageCreateFlagBits ::
VkFlags -> VkImageCreateBitmask FlagBit
pattern VkImageCreateFlagBits n = VkImageCreateBitmask n
pattern VkImageCreateFlags ::
VkFlags -> VkImageCreateBitmask FlagMask
pattern VkImageCreateFlags n = VkImageCreateBitmask n
deriving instance Bits (VkImageCreateBitmask FlagMask)
deriving instance FiniteBits (VkImageCreateBitmask FlagMask)
instance Show (VkImageCreateBitmask a) where
showsPrec _ VK_IMAGE_CREATE_SPARSE_BINDING_BIT
= showString "VK_IMAGE_CREATE_SPARSE_BINDING_BIT"
showsPrec _ VK_IMAGE_CREATE_SPARSE_RESIDENCY_BIT
= showString "VK_IMAGE_CREATE_SPARSE_RESIDENCY_BIT"
showsPrec _ VK_IMAGE_CREATE_SPARSE_ALIASED_BIT
= showString "VK_IMAGE_CREATE_SPARSE_ALIASED_BIT"
showsPrec _ VK_IMAGE_CREATE_MUTABLE_FORMAT_BIT
= showString "VK_IMAGE_CREATE_MUTABLE_FORMAT_BIT"
showsPrec _ VK_IMAGE_CREATE_CUBE_COMPATIBLE_BIT
= showString "VK_IMAGE_CREATE_CUBE_COMPATIBLE_BIT"
showsPrec p (VkImageCreateBitmask x)
= showParen (p >= 11)
(showString "VkImageCreateBitmask " . showsPrec 11 x)
instance Read (VkImageCreateBitmask a) where
readPrec
= parens
(choose
[("VK_IMAGE_CREATE_SPARSE_BINDING_BIT",
pure VK_IMAGE_CREATE_SPARSE_BINDING_BIT),
("VK_IMAGE_CREATE_SPARSE_RESIDENCY_BIT",
pure VK_IMAGE_CREATE_SPARSE_RESIDENCY_BIT),
("VK_IMAGE_CREATE_SPARSE_ALIASED_BIT",
pure VK_IMAGE_CREATE_SPARSE_ALIASED_BIT),
("VK_IMAGE_CREATE_MUTABLE_FORMAT_BIT",
pure VK_IMAGE_CREATE_MUTABLE_FORMAT_BIT),
("VK_IMAGE_CREATE_CUBE_COMPATIBLE_BIT",
pure VK_IMAGE_CREATE_CUBE_COMPATIBLE_BIT)]
+++
prec 10
(expectP (Ident "VkImageCreateBitmask") >>
(VkImageCreateBitmask <$> step readPrec)))
pattern VK_IMAGE_CREATE_SPARSE_BINDING_BIT ::
VkImageCreateBitmask a
pattern VK_IMAGE_CREATE_SPARSE_BINDING_BIT = VkImageCreateBitmask 1
pattern VK_IMAGE_CREATE_SPARSE_RESIDENCY_BIT ::
VkImageCreateBitmask a
pattern VK_IMAGE_CREATE_SPARSE_RESIDENCY_BIT =
VkImageCreateBitmask 2
pattern VK_IMAGE_CREATE_SPARSE_ALIASED_BIT ::
VkImageCreateBitmask a
pattern VK_IMAGE_CREATE_SPARSE_ALIASED_BIT = VkImageCreateBitmask 4
pattern VK_IMAGE_CREATE_MUTABLE_FORMAT_BIT ::
VkImageCreateBitmask a
pattern VK_IMAGE_CREATE_MUTABLE_FORMAT_BIT = VkImageCreateBitmask 8
pattern VK_IMAGE_CREATE_CUBE_COMPATIBLE_BIT ::
VkImageCreateBitmask a
pattern VK_IMAGE_CREATE_CUBE_COMPATIBLE_BIT =
VkImageCreateBitmask 16
newtype VkImageLayout = VkImageLayout Int32
deriving (Eq, Ord, Enum, Storable)
instance Show VkImageLayout where
showsPrec _ VK_IMAGE_LAYOUT_UNDEFINED
= showString "VK_IMAGE_LAYOUT_UNDEFINED"
showsPrec _ VK_IMAGE_LAYOUT_GENERAL
= showString "VK_IMAGE_LAYOUT_GENERAL"
showsPrec _ VK_IMAGE_LAYOUT_COLOR_ATTACHMENT_OPTIMAL
= showString "VK_IMAGE_LAYOUT_COLOR_ATTACHMENT_OPTIMAL"
showsPrec _ VK_IMAGE_LAYOUT_DEPTH_STENCIL_ATTACHMENT_OPTIMAL
= showString "VK_IMAGE_LAYOUT_DEPTH_STENCIL_ATTACHMENT_OPTIMAL"
showsPrec _ VK_IMAGE_LAYOUT_DEPTH_STENCIL_READ_ONLY_OPTIMAL
= showString "VK_IMAGE_LAYOUT_DEPTH_STENCIL_READ_ONLY_OPTIMAL"
showsPrec _ VK_IMAGE_LAYOUT_SHADER_READ_ONLY_OPTIMAL
= showString "VK_IMAGE_LAYOUT_SHADER_READ_ONLY_OPTIMAL"
showsPrec _ VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL
= showString "VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL"
showsPrec _ VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL
= showString "VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL"
showsPrec _ VK_IMAGE_LAYOUT_PREINITIALIZED
= showString "VK_IMAGE_LAYOUT_PREINITIALIZED"
showsPrec p (VkImageLayout x)
= showParen (p >= 11)
(showString "VkImageLayout " . showsPrec 11 x)
instance Read VkImageLayout where
readPrec
= parens
(choose
[("VK_IMAGE_LAYOUT_UNDEFINED", pure VK_IMAGE_LAYOUT_UNDEFINED),
("VK_IMAGE_LAYOUT_GENERAL", pure VK_IMAGE_LAYOUT_GENERAL),
("VK_IMAGE_LAYOUT_COLOR_ATTACHMENT_OPTIMAL",
pure VK_IMAGE_LAYOUT_COLOR_ATTACHMENT_OPTIMAL),
("VK_IMAGE_LAYOUT_DEPTH_STENCIL_ATTACHMENT_OPTIMAL",
pure VK_IMAGE_LAYOUT_DEPTH_STENCIL_ATTACHMENT_OPTIMAL),
("VK_IMAGE_LAYOUT_DEPTH_STENCIL_READ_ONLY_OPTIMAL",
pure VK_IMAGE_LAYOUT_DEPTH_STENCIL_READ_ONLY_OPTIMAL),
("VK_IMAGE_LAYOUT_SHADER_READ_ONLY_OPTIMAL",
pure VK_IMAGE_LAYOUT_SHADER_READ_ONLY_OPTIMAL),
("VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL",
pure VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL),
("VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL",
pure VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL),
("VK_IMAGE_LAYOUT_PREINITIALIZED",
pure VK_IMAGE_LAYOUT_PREINITIALIZED)]
+++
prec 10
(expectP (Ident "VkImageLayout") >>
(VkImageLayout <$> step readPrec)))
pattern VK_IMAGE_LAYOUT_UNDEFINED :: VkImageLayout
pattern VK_IMAGE_LAYOUT_UNDEFINED = VkImageLayout 0
pattern VK_IMAGE_LAYOUT_GENERAL :: VkImageLayout
pattern VK_IMAGE_LAYOUT_GENERAL = VkImageLayout 1
pattern VK_IMAGE_LAYOUT_COLOR_ATTACHMENT_OPTIMAL :: VkImageLayout
pattern VK_IMAGE_LAYOUT_COLOR_ATTACHMENT_OPTIMAL = VkImageLayout 2
pattern VK_IMAGE_LAYOUT_DEPTH_STENCIL_ATTACHMENT_OPTIMAL ::
VkImageLayout
pattern VK_IMAGE_LAYOUT_DEPTH_STENCIL_ATTACHMENT_OPTIMAL =
VkImageLayout 3
pattern VK_IMAGE_LAYOUT_DEPTH_STENCIL_READ_ONLY_OPTIMAL ::
VkImageLayout
pattern VK_IMAGE_LAYOUT_DEPTH_STENCIL_READ_ONLY_OPTIMAL =
VkImageLayout 4
pattern VK_IMAGE_LAYOUT_SHADER_READ_ONLY_OPTIMAL :: VkImageLayout
pattern VK_IMAGE_LAYOUT_SHADER_READ_ONLY_OPTIMAL = VkImageLayout 5
pattern VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL :: VkImageLayout
pattern VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL = VkImageLayout 6
pattern VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL :: VkImageLayout
pattern VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL = VkImageLayout 7
pattern VK_IMAGE_LAYOUT_PREINITIALIZED :: VkImageLayout
pattern VK_IMAGE_LAYOUT_PREINITIALIZED = VkImageLayout 8
newtype VkImageTiling = VkImageTiling Int32
deriving (Eq, Ord, Enum, Storable)
instance Show VkImageTiling where
showsPrec _ VK_IMAGE_TILING_OPTIMAL
= showString "VK_IMAGE_TILING_OPTIMAL"
showsPrec _ VK_IMAGE_TILING_LINEAR
= showString "VK_IMAGE_TILING_LINEAR"
showsPrec p (VkImageTiling x)
= showParen (p >= 11)
(showString "VkImageTiling " . showsPrec 11 x)
instance Read VkImageTiling where
readPrec
= parens
(choose
[("VK_IMAGE_TILING_OPTIMAL", pure VK_IMAGE_TILING_OPTIMAL),
("VK_IMAGE_TILING_LINEAR", pure VK_IMAGE_TILING_LINEAR)]
+++
prec 10
(expectP (Ident "VkImageTiling") >>
(VkImageTiling <$> step readPrec)))
pattern VK_IMAGE_TILING_OPTIMAL :: VkImageTiling
pattern VK_IMAGE_TILING_OPTIMAL = VkImageTiling 0
pattern VK_IMAGE_TILING_LINEAR :: VkImageTiling
pattern VK_IMAGE_TILING_LINEAR = VkImageTiling 1
newtype VkImageType = VkImageType Int32
deriving (Eq, Ord, Enum, Storable)
instance Show VkImageType where
showsPrec _ VK_IMAGE_TYPE_1D = showString "VK_IMAGE_TYPE_1D"
showsPrec _ VK_IMAGE_TYPE_2D = showString "VK_IMAGE_TYPE_2D"
showsPrec _ VK_IMAGE_TYPE_3D = showString "VK_IMAGE_TYPE_3D"
showsPrec p (VkImageType x)
= showParen (p >= 11) (showString "VkImageType " . showsPrec 11 x)
instance Read VkImageType where
readPrec
= parens
(choose
[("VK_IMAGE_TYPE_1D", pure VK_IMAGE_TYPE_1D),
("VK_IMAGE_TYPE_2D", pure VK_IMAGE_TYPE_2D),
("VK_IMAGE_TYPE_3D", pure VK_IMAGE_TYPE_3D)]
+++
prec 10
(expectP (Ident "VkImageType") >> (VkImageType <$> step readPrec)))
pattern VK_IMAGE_TYPE_1D :: VkImageType
pattern VK_IMAGE_TYPE_1D = VkImageType 0
pattern VK_IMAGE_TYPE_2D :: VkImageType
pattern VK_IMAGE_TYPE_2D = VkImageType 1
pattern VK_IMAGE_TYPE_3D :: VkImageType
pattern VK_IMAGE_TYPE_3D = VkImageType 2
newtype VkImageUsageBitmask (a ::
FlagType) = VkImageUsageBitmask VkFlags
deriving (Eq, Ord, Storable)
type VkImageUsageFlags = VkImageUsageBitmask FlagMask
type VkImageUsageFlagBits = VkImageUsageBitmask FlagBit
pattern VkImageUsageFlagBits ::
VkFlags -> VkImageUsageBitmask FlagBit
pattern VkImageUsageFlagBits n = VkImageUsageBitmask n
pattern VkImageUsageFlags ::
VkFlags -> VkImageUsageBitmask FlagMask
pattern VkImageUsageFlags n = VkImageUsageBitmask n
deriving instance Bits (VkImageUsageBitmask FlagMask)
deriving instance FiniteBits (VkImageUsageBitmask FlagMask)
instance Show (VkImageUsageBitmask a) where
showsPrec _ VK_IMAGE_USAGE_TRANSFER_SRC_BIT
= showString "VK_IMAGE_USAGE_TRANSFER_SRC_BIT"
showsPrec _ VK_IMAGE_USAGE_TRANSFER_DST_BIT
= showString "VK_IMAGE_USAGE_TRANSFER_DST_BIT"
showsPrec _ VK_IMAGE_USAGE_SAMPLED_BIT
= showString "VK_IMAGE_USAGE_SAMPLED_BIT"
showsPrec _ VK_IMAGE_USAGE_STORAGE_BIT
= showString "VK_IMAGE_USAGE_STORAGE_BIT"
showsPrec _ VK_IMAGE_USAGE_COLOR_ATTACHMENT_BIT
= showString "VK_IMAGE_USAGE_COLOR_ATTACHMENT_BIT"
showsPrec _ VK_IMAGE_USAGE_DEPTH_STENCIL_ATTACHMENT_BIT
= showString "VK_IMAGE_USAGE_DEPTH_STENCIL_ATTACHMENT_BIT"
showsPrec _ VK_IMAGE_USAGE_TRANSIENT_ATTACHMENT_BIT
= showString "VK_IMAGE_USAGE_TRANSIENT_ATTACHMENT_BIT"
showsPrec _ VK_IMAGE_USAGE_INPUT_ATTACHMENT_BIT
= showString "VK_IMAGE_USAGE_INPUT_ATTACHMENT_BIT"
showsPrec p (VkImageUsageBitmask x)
= showParen (p >= 11)
(showString "VkImageUsageBitmask " . showsPrec 11 x)
instance Read (VkImageUsageBitmask a) where
readPrec
= parens
(choose
[("VK_IMAGE_USAGE_TRANSFER_SRC_BIT",
pure VK_IMAGE_USAGE_TRANSFER_SRC_BIT),
("VK_IMAGE_USAGE_TRANSFER_DST_BIT",
pure VK_IMAGE_USAGE_TRANSFER_DST_BIT),
("VK_IMAGE_USAGE_SAMPLED_BIT", pure VK_IMAGE_USAGE_SAMPLED_BIT),
("VK_IMAGE_USAGE_STORAGE_BIT", pure VK_IMAGE_USAGE_STORAGE_BIT),
("VK_IMAGE_USAGE_COLOR_ATTACHMENT_BIT",
pure VK_IMAGE_USAGE_COLOR_ATTACHMENT_BIT),
("VK_IMAGE_USAGE_DEPTH_STENCIL_ATTACHMENT_BIT",
pure VK_IMAGE_USAGE_DEPTH_STENCIL_ATTACHMENT_BIT),
("VK_IMAGE_USAGE_TRANSIENT_ATTACHMENT_BIT",
pure VK_IMAGE_USAGE_TRANSIENT_ATTACHMENT_BIT),
("VK_IMAGE_USAGE_INPUT_ATTACHMENT_BIT",
pure VK_IMAGE_USAGE_INPUT_ATTACHMENT_BIT)]
+++
prec 10
(expectP (Ident "VkImageUsageBitmask") >>
(VkImageUsageBitmask <$> step readPrec)))
pattern VK_IMAGE_USAGE_TRANSFER_SRC_BIT :: VkImageUsageBitmask a
pattern VK_IMAGE_USAGE_TRANSFER_SRC_BIT = VkImageUsageBitmask 1
pattern VK_IMAGE_USAGE_TRANSFER_DST_BIT :: VkImageUsageBitmask a
pattern VK_IMAGE_USAGE_TRANSFER_DST_BIT = VkImageUsageBitmask 2
pattern VK_IMAGE_USAGE_SAMPLED_BIT :: VkImageUsageBitmask a
pattern VK_IMAGE_USAGE_SAMPLED_BIT = VkImageUsageBitmask 4
pattern VK_IMAGE_USAGE_STORAGE_BIT :: VkImageUsageBitmask a
pattern VK_IMAGE_USAGE_STORAGE_BIT = VkImageUsageBitmask 8
pattern VK_IMAGE_USAGE_COLOR_ATTACHMENT_BIT ::
VkImageUsageBitmask a
pattern VK_IMAGE_USAGE_COLOR_ATTACHMENT_BIT =
VkImageUsageBitmask 16
pattern VK_IMAGE_USAGE_DEPTH_STENCIL_ATTACHMENT_BIT ::
VkImageUsageBitmask a
pattern VK_IMAGE_USAGE_DEPTH_STENCIL_ATTACHMENT_BIT =
VkImageUsageBitmask 32
pattern VK_IMAGE_USAGE_TRANSIENT_ATTACHMENT_BIT ::
VkImageUsageBitmask a
pattern VK_IMAGE_USAGE_TRANSIENT_ATTACHMENT_BIT =
VkImageUsageBitmask 64
pattern VK_IMAGE_USAGE_INPUT_ATTACHMENT_BIT ::
VkImageUsageBitmask a
pattern VK_IMAGE_USAGE_INPUT_ATTACHMENT_BIT =
VkImageUsageBitmask 128
newtype VkImageViewType = VkImageViewType Int32
deriving (Eq, Ord, Enum, Storable)
instance Show VkImageViewType where
showsPrec _ VK_IMAGE_VIEW_TYPE_1D
= showString "VK_IMAGE_VIEW_TYPE_1D"
showsPrec _ VK_IMAGE_VIEW_TYPE_2D
= showString "VK_IMAGE_VIEW_TYPE_2D"
showsPrec _ VK_IMAGE_VIEW_TYPE_3D
= showString "VK_IMAGE_VIEW_TYPE_3D"
showsPrec _ VK_IMAGE_VIEW_TYPE_CUBE
= showString "VK_IMAGE_VIEW_TYPE_CUBE"
showsPrec _ VK_IMAGE_VIEW_TYPE_1D_ARRAY
= showString "VK_IMAGE_VIEW_TYPE_1D_ARRAY"
showsPrec _ VK_IMAGE_VIEW_TYPE_2D_ARRAY
= showString "VK_IMAGE_VIEW_TYPE_2D_ARRAY"
showsPrec _ VK_IMAGE_VIEW_TYPE_CUBE_ARRAY
= showString "VK_IMAGE_VIEW_TYPE_CUBE_ARRAY"
showsPrec p (VkImageViewType x)
= showParen (p >= 11)
(showString "VkImageViewType " . showsPrec 11 x)
instance Read VkImageViewType where
readPrec
= parens
(choose
[("VK_IMAGE_VIEW_TYPE_1D", pure VK_IMAGE_VIEW_TYPE_1D),
("VK_IMAGE_VIEW_TYPE_2D", pure VK_IMAGE_VIEW_TYPE_2D),
("VK_IMAGE_VIEW_TYPE_3D", pure VK_IMAGE_VIEW_TYPE_3D),
("VK_IMAGE_VIEW_TYPE_CUBE", pure VK_IMAGE_VIEW_TYPE_CUBE),
("VK_IMAGE_VIEW_TYPE_1D_ARRAY", pure VK_IMAGE_VIEW_TYPE_1D_ARRAY),
("VK_IMAGE_VIEW_TYPE_2D_ARRAY", pure VK_IMAGE_VIEW_TYPE_2D_ARRAY),
("VK_IMAGE_VIEW_TYPE_CUBE_ARRAY",
pure VK_IMAGE_VIEW_TYPE_CUBE_ARRAY)]
+++
prec 10
(expectP (Ident "VkImageViewType") >>
(VkImageViewType <$> step readPrec)))
pattern VK_IMAGE_VIEW_TYPE_1D :: VkImageViewType
pattern VK_IMAGE_VIEW_TYPE_1D = VkImageViewType 0
pattern VK_IMAGE_VIEW_TYPE_2D :: VkImageViewType
pattern VK_IMAGE_VIEW_TYPE_2D = VkImageViewType 1
pattern VK_IMAGE_VIEW_TYPE_3D :: VkImageViewType
pattern VK_IMAGE_VIEW_TYPE_3D = VkImageViewType 2
pattern VK_IMAGE_VIEW_TYPE_CUBE :: VkImageViewType
pattern VK_IMAGE_VIEW_TYPE_CUBE = VkImageViewType 3
pattern VK_IMAGE_VIEW_TYPE_1D_ARRAY :: VkImageViewType
pattern VK_IMAGE_VIEW_TYPE_1D_ARRAY = VkImageViewType 4
pattern VK_IMAGE_VIEW_TYPE_2D_ARRAY :: VkImageViewType
pattern VK_IMAGE_VIEW_TYPE_2D_ARRAY = VkImageViewType 5
pattern VK_IMAGE_VIEW_TYPE_CUBE_ARRAY :: VkImageViewType
pattern VK_IMAGE_VIEW_TYPE_CUBE_ARRAY = VkImageViewType 6