{-# OPTIONS_GHC -fno-warn-orphans#-}
{-# OPTIONS_HADDOCK not-home#-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE Strict #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE ViewPatterns #-}
module Graphics.Vulkan.Ext.VK_KHR_push_descriptor
(
module Graphics.Vulkan.Marshal,
module Graphics.Vulkan.Types.BaseTypes,
module Graphics.Vulkan.Types.Struct.PhysicalDevice,
module Graphics.Vulkan.Types.Enum.PhysicalDeviceType,
module Graphics.Vulkan.Types.Enum.SampleCountFlags,
module Graphics.Vulkan.Types.Enum.StructureType,
VkCmdPushDescriptorSetKHR, pattern VkCmdPushDescriptorSetKHR,
HS_vkCmdPushDescriptorSetKHR, PFN_vkCmdPushDescriptorSetKHR,
module Graphics.Vulkan.Types.Enum.Descriptor,
module Graphics.Vulkan.Types.Enum.Image,
module Graphics.Vulkan.Types.Enum.Pipeline,
module Graphics.Vulkan.Types.Handles,
module Graphics.Vulkan.Types.Struct.Descriptor,
module Graphics.Vulkan.Types.Struct.WriteDescriptorSet,
VK_KHR_PUSH_DESCRIPTOR_SPEC_VERSION,
pattern VK_KHR_PUSH_DESCRIPTOR_SPEC_VERSION,
VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME,
pattern VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME,
pattern VK_STRUCTURE_TYPE_PHYSICAL_DEVICE_PUSH_DESCRIPTOR_PROPERTIES_KHR,
pattern VK_DESCRIPTOR_SET_LAYOUT_CREATE_PUSH_DESCRIPTOR_BIT_KHR,
VkCmdPushDescriptorSetWithTemplateKHR,
pattern VkCmdPushDescriptorSetWithTemplateKHR,
HS_vkCmdPushDescriptorSetWithTemplateKHR,
PFN_vkCmdPushDescriptorSetWithTemplateKHR,
pattern VK_DESCRIPTOR_UPDATE_TEMPLATE_TYPE_PUSH_DESCRIPTORS_KHR)
where
import GHC.Ptr (Ptr (..))
import Graphics.Vulkan.Marshal
import Graphics.Vulkan.Marshal.Proc (VulkanProc (..))
import Graphics.Vulkan.Types.BaseTypes
import Graphics.Vulkan.Types.Enum.Descriptor
import Graphics.Vulkan.Types.Enum.Image
import Graphics.Vulkan.Types.Enum.PhysicalDeviceType
import Graphics.Vulkan.Types.Enum.Pipeline
import Graphics.Vulkan.Types.Enum.SampleCountFlags
import Graphics.Vulkan.Types.Enum.StructureType
import Graphics.Vulkan.Types.Handles
import Graphics.Vulkan.Types.Struct.Descriptor
import Graphics.Vulkan.Types.Struct.PhysicalDevice
import Graphics.Vulkan.Types.Struct.WriteDescriptorSet
pattern VkCmdPushDescriptorSetKHR :: CString
pattern $bVkCmdPushDescriptorSetKHR :: CString
$mVkCmdPushDescriptorSetKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkCmdPushDescriptorSetKHR <-
(is_VkCmdPushDescriptorSetKHR -> True)
where VkCmdPushDescriptorSetKHR = CString
_VkCmdPushDescriptorSetKHR
{-# INLINE _VkCmdPushDescriptorSetKHR #-}
_VkCmdPushDescriptorSetKHR :: CString
_VkCmdPushDescriptorSetKHR :: CString
_VkCmdPushDescriptorSetKHR = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkCmdPushDescriptorSetKHR\NUL"#
{-# INLINE is_VkCmdPushDescriptorSetKHR #-}
is_VkCmdPushDescriptorSetKHR :: CString -> Bool
is_VkCmdPushDescriptorSetKHR :: CString -> Bool
is_VkCmdPushDescriptorSetKHR
= (Ordering
EQ Ordering -> Ordering -> Bool
forall a. Eq a => a -> a -> Bool
==) (Ordering -> Bool) -> (CString -> Ordering) -> CString -> Bool
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CString -> CString -> Ordering
cmpCStrings CString
_VkCmdPushDescriptorSetKHR
type VkCmdPushDescriptorSetKHR = "vkCmdPushDescriptorSetKHR"
type HS_vkCmdPushDescriptorSetKHR =
VkCommandBuffer
->
VkPipelineBindPoint
->
VkPipelineLayout
->
Word32
-> Word32
-> Ptr VkWriteDescriptorSet
-> IO ()
type PFN_vkCmdPushDescriptorSetKHR =
FunPtr HS_vkCmdPushDescriptorSetKHR
foreign import ccall "dynamic" unwrapVkCmdPushDescriptorSetKHR ::
PFN_vkCmdPushDescriptorSetKHR -> HS_vkCmdPushDescriptorSetKHR
instance VulkanProc "vkCmdPushDescriptorSetKHR" where
type VkProcType "vkCmdPushDescriptorSetKHR" =
HS_vkCmdPushDescriptorSetKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkCmdPushDescriptorSetKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType "vkCmdPushDescriptorSetKHR")
-> VkProcType "vkCmdPushDescriptorSetKHR"
unwrapVkProcPtr = FunPtr (VkProcType "vkCmdPushDescriptorSetKHR")
-> VkProcType "vkCmdPushDescriptorSetKHR"
PFN_vkCmdPushDescriptorSetKHR -> HS_vkCmdPushDescriptorSetKHR
unwrapVkCmdPushDescriptorSetKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VK_KHR_PUSH_DESCRIPTOR_SPEC_VERSION :: (Num a, Eq a) => a
pattern $bVK_KHR_PUSH_DESCRIPTOR_SPEC_VERSION :: a
$mVK_KHR_PUSH_DESCRIPTOR_SPEC_VERSION :: forall r a. (Num a, Eq a) => a -> (Void# -> r) -> (Void# -> r) -> r
VK_KHR_PUSH_DESCRIPTOR_SPEC_VERSION = 2
type VK_KHR_PUSH_DESCRIPTOR_SPEC_VERSION = 2
pattern VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME :: CString
pattern $bVK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME :: CString
$mVK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME <-
(is_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME -> True)
where VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME
= CString
_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME
{-# INLINE _VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME #-}
_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME :: CString
_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME :: CString
_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME
= Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"VK_KHR_push_descriptor\NUL"#
{-# INLINE is_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME #-}
is_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME :: CString -> Bool
is_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME :: CString -> Bool
is_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME
= (Ordering
EQ Ordering -> Ordering -> Bool
forall a. Eq a => a -> a -> Bool
==) (Ordering -> Bool) -> (CString -> Ordering) -> CString -> Bool
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CString -> CString -> Ordering
cmpCStrings CString
_VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME
type VK_KHR_PUSH_DESCRIPTOR_EXTENSION_NAME =
"VK_KHR_push_descriptor"
pattern VK_STRUCTURE_TYPE_PHYSICAL_DEVICE_PUSH_DESCRIPTOR_PROPERTIES_KHR
:: VkStructureType
pattern $bVK_STRUCTURE_TYPE_PHYSICAL_DEVICE_PUSH_DESCRIPTOR_PROPERTIES_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_PHYSICAL_DEVICE_PUSH_DESCRIPTOR_PROPERTIES_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_PHYSICAL_DEVICE_PUSH_DESCRIPTOR_PROPERTIES_KHR
= VkStructureType 1000080000
pattern VK_DESCRIPTOR_SET_LAYOUT_CREATE_PUSH_DESCRIPTOR_BIT_KHR ::
VkDescriptorSetLayoutCreateFlagBits
pattern $bVK_DESCRIPTOR_SET_LAYOUT_CREATE_PUSH_DESCRIPTOR_BIT_KHR :: VkDescriptorSetLayoutCreateFlagBits
$mVK_DESCRIPTOR_SET_LAYOUT_CREATE_PUSH_DESCRIPTOR_BIT_KHR :: forall r.
VkDescriptorSetLayoutCreateFlagBits
-> (Void# -> r) -> (Void# -> r) -> r
VK_DESCRIPTOR_SET_LAYOUT_CREATE_PUSH_DESCRIPTOR_BIT_KHR =
VkDescriptorSetLayoutCreateFlagBits 1
pattern VkCmdPushDescriptorSetWithTemplateKHR :: CString
pattern $bVkCmdPushDescriptorSetWithTemplateKHR :: CString
$mVkCmdPushDescriptorSetWithTemplateKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkCmdPushDescriptorSetWithTemplateKHR <-
(is_VkCmdPushDescriptorSetWithTemplateKHR -> True)
where VkCmdPushDescriptorSetWithTemplateKHR
= CString
_VkCmdPushDescriptorSetWithTemplateKHR
{-# INLINE _VkCmdPushDescriptorSetWithTemplateKHR #-}
_VkCmdPushDescriptorSetWithTemplateKHR :: CString
_VkCmdPushDescriptorSetWithTemplateKHR :: CString
_VkCmdPushDescriptorSetWithTemplateKHR
= Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkCmdPushDescriptorSetWithTemplateKHR\NUL"#
{-# INLINE is_VkCmdPushDescriptorSetWithTemplateKHR #-}
is_VkCmdPushDescriptorSetWithTemplateKHR :: CString -> Bool
is_VkCmdPushDescriptorSetWithTemplateKHR :: CString -> Bool
is_VkCmdPushDescriptorSetWithTemplateKHR
= (Ordering
EQ Ordering -> Ordering -> Bool
forall a. Eq a => a -> a -> Bool
==) (Ordering -> Bool) -> (CString -> Ordering) -> CString -> Bool
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CString -> CString -> Ordering
cmpCStrings CString
_VkCmdPushDescriptorSetWithTemplateKHR
type VkCmdPushDescriptorSetWithTemplateKHR =
"vkCmdPushDescriptorSetWithTemplateKHR"
type HS_vkCmdPushDescriptorSetWithTemplateKHR =
VkCommandBuffer
->
VkDescriptorUpdateTemplate
->
VkPipelineLayout
-> Word32
-> Ptr Void
-> IO ()
type PFN_vkCmdPushDescriptorSetWithTemplateKHR =
FunPtr HS_vkCmdPushDescriptorSetWithTemplateKHR
foreign import ccall "dynamic"
unwrapVkCmdPushDescriptorSetWithTemplateKHR ::
PFN_vkCmdPushDescriptorSetWithTemplateKHR ->
HS_vkCmdPushDescriptorSetWithTemplateKHR
instance VulkanProc "vkCmdPushDescriptorSetWithTemplateKHR" where
type VkProcType "vkCmdPushDescriptorSetWithTemplateKHR" =
HS_vkCmdPushDescriptorSetWithTemplateKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkCmdPushDescriptorSetWithTemplateKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType "vkCmdPushDescriptorSetWithTemplateKHR")
-> VkProcType "vkCmdPushDescriptorSetWithTemplateKHR"
unwrapVkProcPtr = FunPtr (VkProcType "vkCmdPushDescriptorSetWithTemplateKHR")
-> VkProcType "vkCmdPushDescriptorSetWithTemplateKHR"
PFN_vkCmdPushDescriptorSetWithTemplateKHR
-> HS_vkCmdPushDescriptorSetWithTemplateKHR
unwrapVkCmdPushDescriptorSetWithTemplateKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VK_DESCRIPTOR_UPDATE_TEMPLATE_TYPE_PUSH_DESCRIPTORS_KHR ::
VkDescriptorUpdateTemplateType
pattern $bVK_DESCRIPTOR_UPDATE_TEMPLATE_TYPE_PUSH_DESCRIPTORS_KHR :: VkDescriptorUpdateTemplateType
$mVK_DESCRIPTOR_UPDATE_TEMPLATE_TYPE_PUSH_DESCRIPTORS_KHR :: forall r.
VkDescriptorUpdateTemplateType -> (Void# -> r) -> (Void# -> r) -> r
VK_DESCRIPTOR_UPDATE_TEMPLATE_TYPE_PUSH_DESCRIPTORS_KHR =
VkDescriptorUpdateTemplateType 1