{-# OPTIONS_GHC -fno-warn-orphans#-}
{-# OPTIONS_GHC -fno-warn-unused-imports#-}
{-# OPTIONS_HADDOCK not-home#-}
{-# LANGUAGE CPP #-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE Strict #-}
{-# LANGUAGE TypeApplications #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE ViewPatterns #-}
module Graphics.Vulkan.Ext.VK_KHR_swapchain
(
VkCreateSwapchainKHR, pattern VkCreateSwapchainKHR,
HS_vkCreateSwapchainKHR, PFN_vkCreateSwapchainKHR,
vkCreateSwapchainKHR, vkCreateSwapchainKHRSafe,
VkDestroySwapchainKHR, pattern VkDestroySwapchainKHR,
HS_vkDestroySwapchainKHR, PFN_vkDestroySwapchainKHR,
vkDestroySwapchainKHR, vkDestroySwapchainKHRSafe,
VkGetSwapchainImagesKHR, pattern VkGetSwapchainImagesKHR,
HS_vkGetSwapchainImagesKHR, PFN_vkGetSwapchainImagesKHR,
vkGetSwapchainImagesKHR, vkGetSwapchainImagesKHRSafe,
VkAcquireNextImageKHR, pattern VkAcquireNextImageKHR,
HS_vkAcquireNextImageKHR, PFN_vkAcquireNextImageKHR,
vkAcquireNextImageKHR, vkAcquireNextImageKHRSafe,
VkQueuePresentKHR, pattern VkQueuePresentKHR, HS_vkQueuePresentKHR,
PFN_vkQueuePresentKHR, vkQueuePresentKHR, vkQueuePresentKHRSafe,
module Graphics.Vulkan.Marshal,
module Graphics.Vulkan.Types.BaseTypes,
module Graphics.Vulkan.Types.Enum.Color,
module Graphics.Vulkan.Types.Enum.CompositeAlphaFlagsKHR,
module Graphics.Vulkan.Types.Enum.Format,
module Graphics.Vulkan.Types.Enum.Image,
module Graphics.Vulkan.Types.Enum.InternalAllocationType,
module Graphics.Vulkan.Types.Enum.PresentModeKHR,
module Graphics.Vulkan.Types.Enum.Result,
module Graphics.Vulkan.Types.Enum.SharingMode,
module Graphics.Vulkan.Types.Enum.StructureType,
module Graphics.Vulkan.Types.Enum.Surface,
module Graphics.Vulkan.Types.Enum.SwapchainCreateFlagsKHR,
module Graphics.Vulkan.Types.Enum.SystemAllocationScope,
module Graphics.Vulkan.Types.Funcpointers,
module Graphics.Vulkan.Types.Handles,
module Graphics.Vulkan.Types.Struct.AllocationCallbacks,
module Graphics.Vulkan.Types.Struct.Extent,
module Graphics.Vulkan.Types.Struct.Present,
module Graphics.Vulkan.Types.Struct.SwapchainC,
VK_KHR_SWAPCHAIN_SPEC_VERSION,
pattern VK_KHR_SWAPCHAIN_SPEC_VERSION,
VK_KHR_SWAPCHAIN_EXTENSION_NAME,
pattern VK_KHR_SWAPCHAIN_EXTENSION_NAME,
pattern VK_STRUCTURE_TYPE_SWAPCHAIN_CREATE_INFO_KHR,
pattern VK_STRUCTURE_TYPE_PRESENT_INFO_KHR,
pattern VK_IMAGE_LAYOUT_PRESENT_SRC_KHR, pattern VK_SUBOPTIMAL_KHR,
pattern VK_ERROR_OUT_OF_DATE_KHR,
pattern VK_OBJECT_TYPE_SWAPCHAIN_KHR,
module Graphics.Vulkan.Types.Struct.AcquireNextImageInfoKHR,
module Graphics.Vulkan.Types.Struct.Bind,
module Graphics.Vulkan.Types.Struct.Device,
module Graphics.Vulkan.Types.Enum.Device,
module Graphics.Vulkan.Types.Struct.Image,
module Graphics.Vulkan.Types.Enum.SampleCountFlags,
VkGetDeviceGroupPresentCapabilitiesKHR,
pattern VkGetDeviceGroupPresentCapabilitiesKHR,
HS_vkGetDeviceGroupPresentCapabilitiesKHR,
PFN_vkGetDeviceGroupPresentCapabilitiesKHR,
vkGetDeviceGroupPresentCapabilitiesKHR,
vkGetDeviceGroupPresentCapabilitiesKHRSafe,
VkGetDeviceGroupSurfacePresentModesKHR,
pattern VkGetDeviceGroupSurfacePresentModesKHR,
HS_vkGetDeviceGroupSurfacePresentModesKHR,
PFN_vkGetDeviceGroupSurfacePresentModesKHR,
vkGetDeviceGroupSurfacePresentModesKHR,
vkGetDeviceGroupSurfacePresentModesKHRSafe,
VkGetPhysicalDevicePresentRectanglesKHR,
pattern VkGetPhysicalDevicePresentRectanglesKHR,
HS_vkGetPhysicalDevicePresentRectanglesKHR,
PFN_vkGetPhysicalDevicePresentRectanglesKHR,
vkGetPhysicalDevicePresentRectanglesKHR,
vkGetPhysicalDevicePresentRectanglesKHRSafe,
VkAcquireNextImage2KHR, pattern VkAcquireNextImage2KHR,
HS_vkAcquireNextImage2KHR, PFN_vkAcquireNextImage2KHR,
vkAcquireNextImage2KHR, vkAcquireNextImage2KHRSafe,
module Graphics.Vulkan.Types.Struct.Offset,
module Graphics.Vulkan.Types.Struct.Rect,
pattern VK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_CAPABILITIES_KHR,
pattern VK_STRUCTURE_TYPE_IMAGE_SWAPCHAIN_CREATE_INFO_KHR,
pattern VK_STRUCTURE_TYPE_BIND_IMAGE_MEMORY_SWAPCHAIN_INFO_KHR,
pattern VK_STRUCTURE_TYPE_ACQUIRE_NEXT_IMAGE_INFO_KHR,
pattern VK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_INFO_KHR,
pattern VK_STRUCTURE_TYPE_DEVICE_GROUP_SWAPCHAIN_CREATE_INFO_KHR,
pattern VK_SWAPCHAIN_CREATE_SPLIT_INSTANCE_BIND_REGIONS_BIT_KHR,
pattern VK_SWAPCHAIN_CREATE_PROTECTED_BIT_KHR)
where
import GHC.Ptr (Ptr (..))
import Graphics.Vulkan.Marshal
import Graphics.Vulkan.Marshal.Proc
import Graphics.Vulkan.Types.BaseTypes
import Graphics.Vulkan.Types.Enum.Color
import Graphics.Vulkan.Types.Enum.CompositeAlphaFlagsKHR
import Graphics.Vulkan.Types.Enum.Device
import Graphics.Vulkan.Types.Enum.Format
import Graphics.Vulkan.Types.Enum.Image
import Graphics.Vulkan.Types.Enum.InternalAllocationType
import Graphics.Vulkan.Types.Enum.Object (VkObjectType (..))
import Graphics.Vulkan.Types.Enum.PresentModeKHR
import Graphics.Vulkan.Types.Enum.Result
import Graphics.Vulkan.Types.Enum.SampleCountFlags
import Graphics.Vulkan.Types.Enum.SharingMode
import Graphics.Vulkan.Types.Enum.StructureType
import Graphics.Vulkan.Types.Enum.Surface
import Graphics.Vulkan.Types.Enum.SwapchainCreateFlagsKHR
import Graphics.Vulkan.Types.Enum.SystemAllocationScope
import Graphics.Vulkan.Types.Funcpointers
import Graphics.Vulkan.Types.Handles
import Graphics.Vulkan.Types.Struct.AcquireNextImageInfoKHR
import Graphics.Vulkan.Types.Struct.AllocationCallbacks
import Graphics.Vulkan.Types.Struct.Bind
import Graphics.Vulkan.Types.Struct.Device
import Graphics.Vulkan.Types.Struct.Extent
import Graphics.Vulkan.Types.Struct.Image
import Graphics.Vulkan.Types.Struct.Offset
import Graphics.Vulkan.Types.Struct.Present
import Graphics.Vulkan.Types.Struct.Rect
import Graphics.Vulkan.Types.Struct.SwapchainC
import System.IO.Unsafe (unsafeDupablePerformIO)
pattern VkCreateSwapchainKHR :: CString
pattern $bVkCreateSwapchainKHR :: CString
$mVkCreateSwapchainKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkCreateSwapchainKHR <- (is_VkCreateSwapchainKHR -> True)
where VkCreateSwapchainKHR = CString
_VkCreateSwapchainKHR
{-# INLINE _VkCreateSwapchainKHR #-}
_VkCreateSwapchainKHR :: CString
_VkCreateSwapchainKHR :: CString
_VkCreateSwapchainKHR = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkCreateSwapchainKHR\NUL"#
{-# INLINE is_VkCreateSwapchainKHR #-}
is_VkCreateSwapchainKHR :: CString -> Bool
is_VkCreateSwapchainKHR :: CString -> Bool
is_VkCreateSwapchainKHR
= (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
_VkCreateSwapchainKHR
type VkCreateSwapchainKHR = "vkCreateSwapchainKHR"
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall unsafe "vkCreateSwapchainKHR"
vkCreateSwapchainKHR ::
VkDevice
->
Ptr VkSwapchainCreateInfoKHR
->
Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
#else
vkCreateSwapchainKHR ::
VkDevice
->
Ptr VkSwapchainCreateInfoKHR
->
Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
vkCreateSwapchainKHR :: VkDevice
-> Ptr VkSwapchainCreateInfoKHR
-> Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
vkCreateSwapchainKHR
= IO
(VkDevice
-> Ptr VkSwapchainCreateInfoKHR
-> Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult)
-> VkDevice
-> Ptr VkSwapchainCreateInfoKHR
-> Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
forall a. IO a -> a
unsafeDupablePerformIO (VulkanProc VkCreateSwapchainKHR =>
IO (VkProcType VkCreateSwapchainKHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkCreateSwapchainKHR)
{-# NOINLINE vkCreateSwapchainKHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall safe "vkCreateSwapchainKHR"
vkCreateSwapchainKHRSafe ::
VkDevice
->
Ptr VkSwapchainCreateInfoKHR
->
Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
#else
vkCreateSwapchainKHRSafe ::
VkDevice
->
Ptr VkSwapchainCreateInfoKHR
->
Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
vkCreateSwapchainKHRSafe :: VkDevice
-> Ptr VkSwapchainCreateInfoKHR
-> Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
vkCreateSwapchainKHRSafe = VkDevice
-> Ptr VkSwapchainCreateInfoKHR
-> Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
vkCreateSwapchainKHR
{-# INLINE vkCreateSwapchainKHRSafe #-}
#endif
type HS_vkCreateSwapchainKHR =
VkDevice
->
Ptr VkSwapchainCreateInfoKHR
->
Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
type PFN_vkCreateSwapchainKHR = FunPtr HS_vkCreateSwapchainKHR
foreign import ccall "dynamic" unwrapVkCreateSwapchainKHR ::
PFN_vkCreateSwapchainKHR -> HS_vkCreateSwapchainKHR
instance VulkanProc "vkCreateSwapchainKHR" where
type VkProcType "vkCreateSwapchainKHR" = HS_vkCreateSwapchainKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkCreateSwapchainKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkCreateSwapchainKHR)
-> VkProcType VkCreateSwapchainKHR
unwrapVkProcPtr = FunPtr (VkProcType VkCreateSwapchainKHR)
-> VkProcType VkCreateSwapchainKHR
PFN_vkCreateSwapchainKHR
-> VkDevice
-> Ptr VkSwapchainCreateInfoKHR
-> Ptr VkAllocationCallbacks
-> Ptr VkSwapchainKHR
-> IO VkResult
unwrapVkCreateSwapchainKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VkDestroySwapchainKHR :: CString
pattern $bVkDestroySwapchainKHR :: CString
$mVkDestroySwapchainKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkDestroySwapchainKHR <- (is_VkDestroySwapchainKHR -> True)
where VkDestroySwapchainKHR = CString
_VkDestroySwapchainKHR
{-# INLINE _VkDestroySwapchainKHR #-}
_VkDestroySwapchainKHR :: CString
_VkDestroySwapchainKHR :: CString
_VkDestroySwapchainKHR = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkDestroySwapchainKHR\NUL"#
{-# INLINE is_VkDestroySwapchainKHR #-}
is_VkDestroySwapchainKHR :: CString -> Bool
is_VkDestroySwapchainKHR :: CString -> Bool
is_VkDestroySwapchainKHR
= (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
_VkDestroySwapchainKHR
type VkDestroySwapchainKHR = "vkDestroySwapchainKHR"
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall unsafe "vkDestroySwapchainKHR"
vkDestroySwapchainKHR ::
VkDevice
-> VkSwapchainKHR
-> Ptr VkAllocationCallbacks
-> IO ()
#else
vkDestroySwapchainKHR ::
VkDevice
-> VkSwapchainKHR
-> Ptr VkAllocationCallbacks
-> IO ()
vkDestroySwapchainKHR :: VkDevice -> VkSwapchainKHR -> Ptr VkAllocationCallbacks -> IO ()
vkDestroySwapchainKHR
= IO
(VkDevice -> VkSwapchainKHR -> Ptr VkAllocationCallbacks -> IO ())
-> VkDevice -> VkSwapchainKHR -> Ptr VkAllocationCallbacks -> IO ()
forall a. IO a -> a
unsafeDupablePerformIO (VulkanProc VkDestroySwapchainKHR =>
IO (VkProcType VkDestroySwapchainKHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkDestroySwapchainKHR)
{-# NOINLINE vkDestroySwapchainKHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall safe "vkDestroySwapchainKHR"
vkDestroySwapchainKHRSafe ::
VkDevice
-> VkSwapchainKHR
-> Ptr VkAllocationCallbacks
-> IO ()
#else
vkDestroySwapchainKHRSafe ::
VkDevice
-> VkSwapchainKHR
-> Ptr VkAllocationCallbacks
-> IO ()
vkDestroySwapchainKHRSafe :: VkDevice -> VkSwapchainKHR -> Ptr VkAllocationCallbacks -> IO ()
vkDestroySwapchainKHRSafe = VkDevice -> VkSwapchainKHR -> Ptr VkAllocationCallbacks -> IO ()
vkDestroySwapchainKHR
{-# INLINE vkDestroySwapchainKHRSafe #-}
#endif
type HS_vkDestroySwapchainKHR =
VkDevice
-> VkSwapchainKHR
-> Ptr VkAllocationCallbacks
-> IO ()
type PFN_vkDestroySwapchainKHR = FunPtr HS_vkDestroySwapchainKHR
foreign import ccall "dynamic" unwrapVkDestroySwapchainKHR ::
PFN_vkDestroySwapchainKHR -> HS_vkDestroySwapchainKHR
instance VulkanProc "vkDestroySwapchainKHR" where
type VkProcType "vkDestroySwapchainKHR" = HS_vkDestroySwapchainKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkDestroySwapchainKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkDestroySwapchainKHR)
-> VkProcType VkDestroySwapchainKHR
unwrapVkProcPtr = FunPtr (VkProcType VkDestroySwapchainKHR)
-> VkProcType VkDestroySwapchainKHR
PFN_vkDestroySwapchainKHR
-> VkDevice -> VkSwapchainKHR -> Ptr VkAllocationCallbacks -> IO ()
unwrapVkDestroySwapchainKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VkGetSwapchainImagesKHR :: CString
pattern $bVkGetSwapchainImagesKHR :: CString
$mVkGetSwapchainImagesKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkGetSwapchainImagesKHR <-
(is_VkGetSwapchainImagesKHR -> True)
where VkGetSwapchainImagesKHR = CString
_VkGetSwapchainImagesKHR
{-# INLINE _VkGetSwapchainImagesKHR #-}
_VkGetSwapchainImagesKHR :: CString
_VkGetSwapchainImagesKHR :: CString
_VkGetSwapchainImagesKHR = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkGetSwapchainImagesKHR\NUL"#
{-# INLINE is_VkGetSwapchainImagesKHR #-}
is_VkGetSwapchainImagesKHR :: CString -> Bool
is_VkGetSwapchainImagesKHR :: CString -> Bool
is_VkGetSwapchainImagesKHR
= (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
_VkGetSwapchainImagesKHR
type VkGetSwapchainImagesKHR = "vkGetSwapchainImagesKHR"
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall unsafe "vkGetSwapchainImagesKHR"
vkGetSwapchainImagesKHR ::
VkDevice
->
VkSwapchainKHR
-> Ptr Word32
-> Ptr VkImage
-> IO VkResult
#else
vkGetSwapchainImagesKHR ::
VkDevice
->
VkSwapchainKHR
-> Ptr Word32
-> Ptr VkImage
-> IO VkResult
vkGetSwapchainImagesKHR :: VkDevice
-> VkSwapchainKHR -> Ptr Word32 -> Ptr VkImage -> IO VkResult
vkGetSwapchainImagesKHR
= IO
(VkDevice
-> VkSwapchainKHR -> Ptr Word32 -> Ptr VkImage -> IO VkResult)
-> VkDevice
-> VkSwapchainKHR
-> Ptr Word32
-> Ptr VkImage
-> IO VkResult
forall a. IO a -> a
unsafeDupablePerformIO (VulkanProc VkGetSwapchainImagesKHR =>
IO (VkProcType VkGetSwapchainImagesKHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkGetSwapchainImagesKHR)
{-# NOINLINE vkGetSwapchainImagesKHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall safe "vkGetSwapchainImagesKHR"
vkGetSwapchainImagesKHRSafe ::
VkDevice
->
VkSwapchainKHR
-> Ptr Word32
-> Ptr VkImage
-> IO VkResult
#else
vkGetSwapchainImagesKHRSafe ::
VkDevice
->
VkSwapchainKHR
-> Ptr Word32
-> Ptr VkImage
-> IO VkResult
vkGetSwapchainImagesKHRSafe :: VkDevice
-> VkSwapchainKHR -> Ptr Word32 -> Ptr VkImage -> IO VkResult
vkGetSwapchainImagesKHRSafe = VkDevice
-> VkSwapchainKHR -> Ptr Word32 -> Ptr VkImage -> IO VkResult
vkGetSwapchainImagesKHR
{-# INLINE vkGetSwapchainImagesKHRSafe #-}
#endif
type HS_vkGetSwapchainImagesKHR =
VkDevice
->
VkSwapchainKHR
-> Ptr Word32
-> Ptr VkImage
-> IO VkResult
type PFN_vkGetSwapchainImagesKHR =
FunPtr HS_vkGetSwapchainImagesKHR
foreign import ccall "dynamic" unwrapVkGetSwapchainImagesKHR ::
PFN_vkGetSwapchainImagesKHR -> HS_vkGetSwapchainImagesKHR
instance VulkanProc "vkGetSwapchainImagesKHR" where
type VkProcType "vkGetSwapchainImagesKHR" =
HS_vkGetSwapchainImagesKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkGetSwapchainImagesKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkGetSwapchainImagesKHR)
-> VkProcType VkGetSwapchainImagesKHR
unwrapVkProcPtr = FunPtr (VkProcType VkGetSwapchainImagesKHR)
-> VkProcType VkGetSwapchainImagesKHR
PFN_vkGetSwapchainImagesKHR
-> VkDevice
-> VkSwapchainKHR
-> Ptr Word32
-> Ptr VkImage
-> IO VkResult
unwrapVkGetSwapchainImagesKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VkAcquireNextImageKHR :: CString
pattern $bVkAcquireNextImageKHR :: CString
$mVkAcquireNextImageKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkAcquireNextImageKHR <- (is_VkAcquireNextImageKHR -> True)
where VkAcquireNextImageKHR = CString
_VkAcquireNextImageKHR
{-# INLINE _VkAcquireNextImageKHR #-}
_VkAcquireNextImageKHR :: CString
_VkAcquireNextImageKHR :: CString
_VkAcquireNextImageKHR = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkAcquireNextImageKHR\NUL"#
{-# INLINE is_VkAcquireNextImageKHR #-}
is_VkAcquireNextImageKHR :: CString -> Bool
is_VkAcquireNextImageKHR :: CString -> Bool
is_VkAcquireNextImageKHR
= (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
_VkAcquireNextImageKHR
type VkAcquireNextImageKHR = "vkAcquireNextImageKHR"
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall unsafe "vkAcquireNextImageKHR"
vkAcquireNextImageKHR ::
VkDevice
->
VkSwapchainKHR
->
Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
#else
vkAcquireNextImageKHR ::
VkDevice
->
VkSwapchainKHR
->
Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
vkAcquireNextImageKHR :: VkDevice
-> VkSwapchainKHR
-> Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
vkAcquireNextImageKHR
= IO
(VkDevice
-> VkSwapchainKHR
-> Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult)
-> VkDevice
-> VkSwapchainKHR
-> Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
forall a. IO a -> a
unsafeDupablePerformIO (VulkanProc VkAcquireNextImageKHR =>
IO (VkProcType VkAcquireNextImageKHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkAcquireNextImageKHR)
{-# NOINLINE vkAcquireNextImageKHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall safe "vkAcquireNextImageKHR"
vkAcquireNextImageKHRSafe ::
VkDevice
->
VkSwapchainKHR
->
Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
#else
vkAcquireNextImageKHRSafe ::
VkDevice
->
VkSwapchainKHR
->
Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
vkAcquireNextImageKHRSafe :: VkDevice
-> VkSwapchainKHR
-> Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
vkAcquireNextImageKHRSafe = VkDevice
-> VkSwapchainKHR
-> Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
vkAcquireNextImageKHR
{-# INLINE vkAcquireNextImageKHRSafe #-}
#endif
type HS_vkAcquireNextImageKHR =
VkDevice
->
VkSwapchainKHR
->
Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
type PFN_vkAcquireNextImageKHR = FunPtr HS_vkAcquireNextImageKHR
foreign import ccall "dynamic" unwrapVkAcquireNextImageKHR ::
PFN_vkAcquireNextImageKHR -> HS_vkAcquireNextImageKHR
instance VulkanProc "vkAcquireNextImageKHR" where
type VkProcType "vkAcquireNextImageKHR" = HS_vkAcquireNextImageKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkAcquireNextImageKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkAcquireNextImageKHR)
-> VkProcType VkAcquireNextImageKHR
unwrapVkProcPtr = FunPtr (VkProcType VkAcquireNextImageKHR)
-> VkProcType VkAcquireNextImageKHR
PFN_vkAcquireNextImageKHR
-> VkDevice
-> VkSwapchainKHR
-> Word64
-> VkSemaphore
-> VkFence
-> Ptr Word32
-> IO VkResult
unwrapVkAcquireNextImageKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VkQueuePresentKHR :: CString
pattern $bVkQueuePresentKHR :: CString
$mVkQueuePresentKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkQueuePresentKHR <- (is_VkQueuePresentKHR -> True)
where VkQueuePresentKHR = CString
_VkQueuePresentKHR
{-# INLINE _VkQueuePresentKHR #-}
_VkQueuePresentKHR :: CString
_VkQueuePresentKHR :: CString
_VkQueuePresentKHR = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkQueuePresentKHR\NUL"#
{-# INLINE is_VkQueuePresentKHR #-}
is_VkQueuePresentKHR :: CString -> Bool
is_VkQueuePresentKHR :: CString -> Bool
is_VkQueuePresentKHR = (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
_VkQueuePresentKHR
type VkQueuePresentKHR = "vkQueuePresentKHR"
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall unsafe "vkQueuePresentKHR" vkQueuePresentKHR
:: VkQueue
-> Ptr VkPresentInfoKHR
-> IO VkResult
#else
vkQueuePresentKHR :: VkQueue
-> Ptr VkPresentInfoKHR
-> IO VkResult
vkQueuePresentKHR :: VkQueue -> Ptr VkPresentInfoKHR -> IO VkResult
vkQueuePresentKHR
= IO (VkQueue -> Ptr VkPresentInfoKHR -> IO VkResult)
-> VkQueue -> Ptr VkPresentInfoKHR -> IO VkResult
forall a. IO a -> a
unsafeDupablePerformIO (VulkanProc VkQueuePresentKHR => IO (VkProcType VkQueuePresentKHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkQueuePresentKHR)
{-# NOINLINE vkQueuePresentKHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_0
foreign import ccall safe "vkQueuePresentKHR" vkQueuePresentKHRSafe
:: VkQueue
-> Ptr VkPresentInfoKHR
-> IO VkResult
#else
vkQueuePresentKHRSafe ::
VkQueue
-> Ptr VkPresentInfoKHR
-> IO VkResult
vkQueuePresentKHRSafe :: VkQueue -> Ptr VkPresentInfoKHR -> IO VkResult
vkQueuePresentKHRSafe = VkQueue -> Ptr VkPresentInfoKHR -> IO VkResult
vkQueuePresentKHR
{-# INLINE vkQueuePresentKHRSafe #-}
#endif
type HS_vkQueuePresentKHR =
VkQueue
-> Ptr VkPresentInfoKHR
-> IO VkResult
type PFN_vkQueuePresentKHR = FunPtr HS_vkQueuePresentKHR
foreign import ccall "dynamic" unwrapVkQueuePresentKHR ::
PFN_vkQueuePresentKHR -> HS_vkQueuePresentKHR
instance VulkanProc "vkQueuePresentKHR" where
type VkProcType "vkQueuePresentKHR" = HS_vkQueuePresentKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkQueuePresentKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkQueuePresentKHR)
-> VkProcType VkQueuePresentKHR
unwrapVkProcPtr = FunPtr (VkProcType VkQueuePresentKHR)
-> VkProcType VkQueuePresentKHR
PFN_vkQueuePresentKHR
-> VkQueue -> Ptr VkPresentInfoKHR -> IO VkResult
unwrapVkQueuePresentKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VK_KHR_SWAPCHAIN_SPEC_VERSION :: (Num a, Eq a) => a
pattern $bVK_KHR_SWAPCHAIN_SPEC_VERSION :: a
$mVK_KHR_SWAPCHAIN_SPEC_VERSION :: forall r a. (Num a, Eq a) => a -> (Void# -> r) -> (Void# -> r) -> r
VK_KHR_SWAPCHAIN_SPEC_VERSION = 70
type VK_KHR_SWAPCHAIN_SPEC_VERSION = 70
pattern VK_KHR_SWAPCHAIN_EXTENSION_NAME :: CString
pattern $bVK_KHR_SWAPCHAIN_EXTENSION_NAME :: CString
$mVK_KHR_SWAPCHAIN_EXTENSION_NAME :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VK_KHR_SWAPCHAIN_EXTENSION_NAME <-
(is_VK_KHR_SWAPCHAIN_EXTENSION_NAME -> True)
where VK_KHR_SWAPCHAIN_EXTENSION_NAME
= CString
_VK_KHR_SWAPCHAIN_EXTENSION_NAME
{-# INLINE _VK_KHR_SWAPCHAIN_EXTENSION_NAME #-}
_VK_KHR_SWAPCHAIN_EXTENSION_NAME :: CString
_VK_KHR_SWAPCHAIN_EXTENSION_NAME :: CString
_VK_KHR_SWAPCHAIN_EXTENSION_NAME = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"VK_KHR_swapchain\NUL"#
{-# INLINE is_VK_KHR_SWAPCHAIN_EXTENSION_NAME #-}
is_VK_KHR_SWAPCHAIN_EXTENSION_NAME :: CString -> Bool
is_VK_KHR_SWAPCHAIN_EXTENSION_NAME :: CString -> Bool
is_VK_KHR_SWAPCHAIN_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_SWAPCHAIN_EXTENSION_NAME
type VK_KHR_SWAPCHAIN_EXTENSION_NAME = "VK_KHR_swapchain"
pattern VK_STRUCTURE_TYPE_SWAPCHAIN_CREATE_INFO_KHR ::
VkStructureType
pattern $bVK_STRUCTURE_TYPE_SWAPCHAIN_CREATE_INFO_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_SWAPCHAIN_CREATE_INFO_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_SWAPCHAIN_CREATE_INFO_KHR =
VkStructureType 1000001000
pattern VK_STRUCTURE_TYPE_PRESENT_INFO_KHR :: VkStructureType
pattern $bVK_STRUCTURE_TYPE_PRESENT_INFO_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_PRESENT_INFO_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_PRESENT_INFO_KHR =
VkStructureType 1000001001
pattern VK_IMAGE_LAYOUT_PRESENT_SRC_KHR :: VkImageLayout
pattern $bVK_IMAGE_LAYOUT_PRESENT_SRC_KHR :: VkImageLayout
$mVK_IMAGE_LAYOUT_PRESENT_SRC_KHR :: forall r. VkImageLayout -> (Void# -> r) -> (Void# -> r) -> r
VK_IMAGE_LAYOUT_PRESENT_SRC_KHR = VkImageLayout 1000001002
pattern VK_SUBOPTIMAL_KHR :: VkResult
pattern $bVK_SUBOPTIMAL_KHR :: VkResult
$mVK_SUBOPTIMAL_KHR :: forall r. VkResult -> (Void# -> r) -> (Void# -> r) -> r
VK_SUBOPTIMAL_KHR = VkResult 1000001003
pattern VK_ERROR_OUT_OF_DATE_KHR :: VkResult
pattern $bVK_ERROR_OUT_OF_DATE_KHR :: VkResult
$mVK_ERROR_OUT_OF_DATE_KHR :: forall r. VkResult -> (Void# -> r) -> (Void# -> r) -> r
VK_ERROR_OUT_OF_DATE_KHR = VkResult (-1000001004)
pattern VK_OBJECT_TYPE_SWAPCHAIN_KHR :: VkObjectType
pattern $bVK_OBJECT_TYPE_SWAPCHAIN_KHR :: VkObjectType
$mVK_OBJECT_TYPE_SWAPCHAIN_KHR :: forall r. VkObjectType -> (Void# -> r) -> (Void# -> r) -> r
VK_OBJECT_TYPE_SWAPCHAIN_KHR = VkObjectType 1000001000
pattern VkGetDeviceGroupPresentCapabilitiesKHR :: CString
pattern $bVkGetDeviceGroupPresentCapabilitiesKHR :: CString
$mVkGetDeviceGroupPresentCapabilitiesKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkGetDeviceGroupPresentCapabilitiesKHR <-
(is_VkGetDeviceGroupPresentCapabilitiesKHR -> True)
where VkGetDeviceGroupPresentCapabilitiesKHR
= CString
_VkGetDeviceGroupPresentCapabilitiesKHR
{-# INLINE _VkGetDeviceGroupPresentCapabilitiesKHR #-}
_VkGetDeviceGroupPresentCapabilitiesKHR :: CString
_VkGetDeviceGroupPresentCapabilitiesKHR :: CString
_VkGetDeviceGroupPresentCapabilitiesKHR
= Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkGetDeviceGroupPresentCapabilitiesKHR\NUL"#
{-# INLINE is_VkGetDeviceGroupPresentCapabilitiesKHR #-}
is_VkGetDeviceGroupPresentCapabilitiesKHR :: CString -> Bool
is_VkGetDeviceGroupPresentCapabilitiesKHR :: CString -> Bool
is_VkGetDeviceGroupPresentCapabilitiesKHR
= (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
_VkGetDeviceGroupPresentCapabilitiesKHR
type VkGetDeviceGroupPresentCapabilitiesKHR =
"vkGetDeviceGroupPresentCapabilitiesKHR"
#ifdef NATIVE_FFI_VK_VERSION_1_1
foreign import ccall unsafe
"vkGetDeviceGroupPresentCapabilitiesKHR"
vkGetDeviceGroupPresentCapabilitiesKHR ::
VkDevice
-> Ptr VkDeviceGroupPresentCapabilitiesKHR
-> IO VkResult
#else
vkGetDeviceGroupPresentCapabilitiesKHR ::
VkDevice
->
Ptr VkDeviceGroupPresentCapabilitiesKHR
-> IO VkResult
vkGetDeviceGroupPresentCapabilitiesKHR :: VkDevice -> Ptr VkDeviceGroupPresentCapabilitiesKHR -> IO VkResult
vkGetDeviceGroupPresentCapabilitiesKHR
= IO
(VkDevice
-> Ptr VkDeviceGroupPresentCapabilitiesKHR -> IO VkResult)
-> VkDevice
-> Ptr VkDeviceGroupPresentCapabilitiesKHR
-> IO VkResult
forall a. IO a -> a
unsafeDupablePerformIO
(VulkanProc VkGetDeviceGroupPresentCapabilitiesKHR =>
IO (VkProcType VkGetDeviceGroupPresentCapabilitiesKHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkGetDeviceGroupPresentCapabilitiesKHR)
{-# NOINLINE vkGetDeviceGroupPresentCapabilitiesKHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_1
foreign import ccall safe "vkGetDeviceGroupPresentCapabilitiesKHR"
vkGetDeviceGroupPresentCapabilitiesKHRSafe ::
VkDevice
-> Ptr VkDeviceGroupPresentCapabilitiesKHR
-> IO VkResult
#else
vkGetDeviceGroupPresentCapabilitiesKHRSafe ::
VkDevice
->
Ptr VkDeviceGroupPresentCapabilitiesKHR
-> IO VkResult
vkGetDeviceGroupPresentCapabilitiesKHRSafe :: VkDevice -> Ptr VkDeviceGroupPresentCapabilitiesKHR -> IO VkResult
vkGetDeviceGroupPresentCapabilitiesKHRSafe
= VkDevice -> Ptr VkDeviceGroupPresentCapabilitiesKHR -> IO VkResult
vkGetDeviceGroupPresentCapabilitiesKHR
{-# INLINE vkGetDeviceGroupPresentCapabilitiesKHRSafe #-}
#endif
type HS_vkGetDeviceGroupPresentCapabilitiesKHR =
VkDevice
-> Ptr VkDeviceGroupPresentCapabilitiesKHR
-> IO VkResult
type PFN_vkGetDeviceGroupPresentCapabilitiesKHR =
FunPtr HS_vkGetDeviceGroupPresentCapabilitiesKHR
foreign import ccall "dynamic"
unwrapVkGetDeviceGroupPresentCapabilitiesKHR ::
PFN_vkGetDeviceGroupPresentCapabilitiesKHR ->
HS_vkGetDeviceGroupPresentCapabilitiesKHR
instance VulkanProc "vkGetDeviceGroupPresentCapabilitiesKHR" where
type VkProcType "vkGetDeviceGroupPresentCapabilitiesKHR" =
HS_vkGetDeviceGroupPresentCapabilitiesKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkGetDeviceGroupPresentCapabilitiesKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkGetDeviceGroupPresentCapabilitiesKHR)
-> VkProcType VkGetDeviceGroupPresentCapabilitiesKHR
unwrapVkProcPtr = FunPtr (VkProcType VkGetDeviceGroupPresentCapabilitiesKHR)
-> VkProcType VkGetDeviceGroupPresentCapabilitiesKHR
PFN_vkGetDeviceGroupPresentCapabilitiesKHR
-> VkDevice
-> Ptr VkDeviceGroupPresentCapabilitiesKHR
-> IO VkResult
unwrapVkGetDeviceGroupPresentCapabilitiesKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VkGetDeviceGroupSurfacePresentModesKHR :: CString
pattern $bVkGetDeviceGroupSurfacePresentModesKHR :: CString
$mVkGetDeviceGroupSurfacePresentModesKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkGetDeviceGroupSurfacePresentModesKHR <-
(is_VkGetDeviceGroupSurfacePresentModesKHR -> True)
where VkGetDeviceGroupSurfacePresentModesKHR
= CString
_VkGetDeviceGroupSurfacePresentModesKHR
{-# INLINE _VkGetDeviceGroupSurfacePresentModesKHR #-}
_VkGetDeviceGroupSurfacePresentModesKHR :: CString
_VkGetDeviceGroupSurfacePresentModesKHR :: CString
_VkGetDeviceGroupSurfacePresentModesKHR
= Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkGetDeviceGroupSurfacePresentModesKHR\NUL"#
{-# INLINE is_VkGetDeviceGroupSurfacePresentModesKHR #-}
is_VkGetDeviceGroupSurfacePresentModesKHR :: CString -> Bool
is_VkGetDeviceGroupSurfacePresentModesKHR :: CString -> Bool
is_VkGetDeviceGroupSurfacePresentModesKHR
= (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
_VkGetDeviceGroupSurfacePresentModesKHR
type VkGetDeviceGroupSurfacePresentModesKHR =
"vkGetDeviceGroupSurfacePresentModesKHR"
#ifdef NATIVE_FFI_VK_VERSION_1_1
foreign import ccall unsafe
"vkGetDeviceGroupSurfacePresentModesKHR"
vkGetDeviceGroupSurfacePresentModesKHR ::
VkDevice
->
VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
#else
vkGetDeviceGroupSurfacePresentModesKHR ::
VkDevice
->
VkSurfaceKHR
->
Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
vkGetDeviceGroupSurfacePresentModesKHR :: VkDevice
-> VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
vkGetDeviceGroupSurfacePresentModesKHR
= IO
(VkDevice
-> VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult)
-> VkDevice
-> VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
forall a. IO a -> a
unsafeDupablePerformIO
(VulkanProc VkGetDeviceGroupSurfacePresentModesKHR =>
IO (VkProcType VkGetDeviceGroupSurfacePresentModesKHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkGetDeviceGroupSurfacePresentModesKHR)
{-# NOINLINE vkGetDeviceGroupSurfacePresentModesKHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_1
foreign import ccall safe "vkGetDeviceGroupSurfacePresentModesKHR"
vkGetDeviceGroupSurfacePresentModesKHRSafe ::
VkDevice
->
VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
#else
vkGetDeviceGroupSurfacePresentModesKHRSafe ::
VkDevice
->
VkSurfaceKHR
->
Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
vkGetDeviceGroupSurfacePresentModesKHRSafe :: VkDevice
-> VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
vkGetDeviceGroupSurfacePresentModesKHRSafe
= VkDevice
-> VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
vkGetDeviceGroupSurfacePresentModesKHR
{-# INLINE vkGetDeviceGroupSurfacePresentModesKHRSafe #-}
#endif
type HS_vkGetDeviceGroupSurfacePresentModesKHR =
VkDevice
->
VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
type PFN_vkGetDeviceGroupSurfacePresentModesKHR =
FunPtr HS_vkGetDeviceGroupSurfacePresentModesKHR
foreign import ccall "dynamic"
unwrapVkGetDeviceGroupSurfacePresentModesKHR ::
PFN_vkGetDeviceGroupSurfacePresentModesKHR ->
HS_vkGetDeviceGroupSurfacePresentModesKHR
instance VulkanProc "vkGetDeviceGroupSurfacePresentModesKHR" where
type VkProcType "vkGetDeviceGroupSurfacePresentModesKHR" =
HS_vkGetDeviceGroupSurfacePresentModesKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkGetDeviceGroupSurfacePresentModesKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkGetDeviceGroupSurfacePresentModesKHR)
-> VkProcType VkGetDeviceGroupSurfacePresentModesKHR
unwrapVkProcPtr = FunPtr (VkProcType VkGetDeviceGroupSurfacePresentModesKHR)
-> VkProcType VkGetDeviceGroupSurfacePresentModesKHR
PFN_vkGetDeviceGroupSurfacePresentModesKHR
-> VkDevice
-> VkSurfaceKHR
-> Ptr VkDeviceGroupPresentModeFlagsKHR
-> IO VkResult
unwrapVkGetDeviceGroupSurfacePresentModesKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VkGetPhysicalDevicePresentRectanglesKHR :: CString
pattern $bVkGetPhysicalDevicePresentRectanglesKHR :: CString
$mVkGetPhysicalDevicePresentRectanglesKHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkGetPhysicalDevicePresentRectanglesKHR <-
(is_VkGetPhysicalDevicePresentRectanglesKHR -> True)
where VkGetPhysicalDevicePresentRectanglesKHR
= CString
_VkGetPhysicalDevicePresentRectanglesKHR
{-# INLINE _VkGetPhysicalDevicePresentRectanglesKHR #-}
_VkGetPhysicalDevicePresentRectanglesKHR :: CString
_VkGetPhysicalDevicePresentRectanglesKHR :: CString
_VkGetPhysicalDevicePresentRectanglesKHR
= Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkGetPhysicalDevicePresentRectanglesKHR\NUL"#
{-# INLINE is_VkGetPhysicalDevicePresentRectanglesKHR #-}
is_VkGetPhysicalDevicePresentRectanglesKHR :: CString -> Bool
is_VkGetPhysicalDevicePresentRectanglesKHR :: CString -> Bool
is_VkGetPhysicalDevicePresentRectanglesKHR
= (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
_VkGetPhysicalDevicePresentRectanglesKHR
type VkGetPhysicalDevicePresentRectanglesKHR =
"vkGetPhysicalDevicePresentRectanglesKHR"
#ifdef NATIVE_FFI_VK_VERSION_1_1
foreign import ccall unsafe
"vkGetPhysicalDevicePresentRectanglesKHR"
vkGetPhysicalDevicePresentRectanglesKHR ::
VkPhysicalDevice
->
VkSurfaceKHR
-> Ptr Word32
-> Ptr VkRect2D
-> IO VkResult
#else
vkGetPhysicalDevicePresentRectanglesKHR ::
VkPhysicalDevice
->
VkSurfaceKHR
-> Ptr Word32
-> Ptr VkRect2D
-> IO VkResult
vkGetPhysicalDevicePresentRectanglesKHR :: VkPhysicalDevice
-> VkSurfaceKHR -> Ptr Word32 -> Ptr VkRect2D -> IO VkResult
vkGetPhysicalDevicePresentRectanglesKHR
= IO
(VkPhysicalDevice
-> VkSurfaceKHR -> Ptr Word32 -> Ptr VkRect2D -> IO VkResult)
-> VkPhysicalDevice
-> VkSurfaceKHR
-> Ptr Word32
-> Ptr VkRect2D
-> IO VkResult
forall a. IO a -> a
unsafeDupablePerformIO
(VulkanProc VkGetPhysicalDevicePresentRectanglesKHR =>
IO (VkProcType VkGetPhysicalDevicePresentRectanglesKHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkGetPhysicalDevicePresentRectanglesKHR)
{-# NOINLINE vkGetPhysicalDevicePresentRectanglesKHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_1
foreign import ccall safe "vkGetPhysicalDevicePresentRectanglesKHR"
vkGetPhysicalDevicePresentRectanglesKHRSafe ::
VkPhysicalDevice
->
VkSurfaceKHR
-> Ptr Word32
-> Ptr VkRect2D
-> IO VkResult
#else
vkGetPhysicalDevicePresentRectanglesKHRSafe ::
VkPhysicalDevice
->
VkSurfaceKHR
->
Ptr Word32
-> Ptr VkRect2D
-> IO VkResult
vkGetPhysicalDevicePresentRectanglesKHRSafe :: VkPhysicalDevice
-> VkSurfaceKHR -> Ptr Word32 -> Ptr VkRect2D -> IO VkResult
vkGetPhysicalDevicePresentRectanglesKHRSafe
= VkPhysicalDevice
-> VkSurfaceKHR -> Ptr Word32 -> Ptr VkRect2D -> IO VkResult
vkGetPhysicalDevicePresentRectanglesKHR
{-# INLINE vkGetPhysicalDevicePresentRectanglesKHRSafe #-}
#endif
type HS_vkGetPhysicalDevicePresentRectanglesKHR =
VkPhysicalDevice
->
VkSurfaceKHR
-> Ptr Word32
-> Ptr VkRect2D
-> IO VkResult
type PFN_vkGetPhysicalDevicePresentRectanglesKHR =
FunPtr HS_vkGetPhysicalDevicePresentRectanglesKHR
foreign import ccall "dynamic"
unwrapVkGetPhysicalDevicePresentRectanglesKHR ::
PFN_vkGetPhysicalDevicePresentRectanglesKHR ->
HS_vkGetPhysicalDevicePresentRectanglesKHR
instance VulkanProc "vkGetPhysicalDevicePresentRectanglesKHR" where
type VkProcType "vkGetPhysicalDevicePresentRectanglesKHR" =
HS_vkGetPhysicalDevicePresentRectanglesKHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkGetPhysicalDevicePresentRectanglesKHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkGetPhysicalDevicePresentRectanglesKHR)
-> VkProcType VkGetPhysicalDevicePresentRectanglesKHR
unwrapVkProcPtr = FunPtr (VkProcType VkGetPhysicalDevicePresentRectanglesKHR)
-> VkProcType VkGetPhysicalDevicePresentRectanglesKHR
PFN_vkGetPhysicalDevicePresentRectanglesKHR
-> VkPhysicalDevice
-> VkSurfaceKHR
-> Ptr Word32
-> Ptr VkRect2D
-> IO VkResult
unwrapVkGetPhysicalDevicePresentRectanglesKHR
{-# INLINE unwrapVkProcPtr #-}
pattern VkAcquireNextImage2KHR :: CString
pattern $bVkAcquireNextImage2KHR :: CString
$mVkAcquireNextImage2KHR :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkAcquireNextImage2KHR <-
(is_VkAcquireNextImage2KHR -> True)
where VkAcquireNextImage2KHR = CString
_VkAcquireNextImage2KHR
{-# INLINE _VkAcquireNextImage2KHR #-}
_VkAcquireNextImage2KHR :: CString
_VkAcquireNextImage2KHR :: CString
_VkAcquireNextImage2KHR = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkAcquireNextImage2KHR\NUL"#
{-# INLINE is_VkAcquireNextImage2KHR #-}
is_VkAcquireNextImage2KHR :: CString -> Bool
is_VkAcquireNextImage2KHR :: CString -> Bool
is_VkAcquireNextImage2KHR
= (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
_VkAcquireNextImage2KHR
type VkAcquireNextImage2KHR = "vkAcquireNextImage2KHR"
#ifdef NATIVE_FFI_VK_VERSION_1_1
foreign import ccall unsafe "vkAcquireNextImage2KHR"
vkAcquireNextImage2KHR ::
VkDevice
->
Ptr VkAcquireNextImageInfoKHR
-> Ptr Word32
-> IO VkResult
#else
vkAcquireNextImage2KHR ::
VkDevice
->
Ptr VkAcquireNextImageInfoKHR
-> Ptr Word32
-> IO VkResult
vkAcquireNextImage2KHR :: VkDevice
-> Ptr VkAcquireNextImageInfoKHR -> Ptr Word32 -> IO VkResult
vkAcquireNextImage2KHR
= IO
(VkDevice
-> Ptr VkAcquireNextImageInfoKHR -> Ptr Word32 -> IO VkResult)
-> VkDevice
-> Ptr VkAcquireNextImageInfoKHR
-> Ptr Word32
-> IO VkResult
forall a. IO a -> a
unsafeDupablePerformIO (VulkanProc VkAcquireNextImage2KHR =>
IO (VkProcType VkAcquireNextImage2KHR)
forall (proc :: Symbol). VulkanProc proc => IO (VkProcType proc)
vkGetProc @VkAcquireNextImage2KHR)
{-# NOINLINE vkAcquireNextImage2KHR #-}
#endif
#ifdef NATIVE_FFI_VK_VERSION_1_1
foreign import ccall safe "vkAcquireNextImage2KHR"
vkAcquireNextImage2KHRSafe ::
VkDevice
->
Ptr VkAcquireNextImageInfoKHR
-> Ptr Word32
-> IO VkResult
#else
vkAcquireNextImage2KHRSafe ::
VkDevice
->
Ptr VkAcquireNextImageInfoKHR
-> Ptr Word32
-> IO VkResult
vkAcquireNextImage2KHRSafe :: VkDevice
-> Ptr VkAcquireNextImageInfoKHR -> Ptr Word32 -> IO VkResult
vkAcquireNextImage2KHRSafe = VkDevice
-> Ptr VkAcquireNextImageInfoKHR -> Ptr Word32 -> IO VkResult
vkAcquireNextImage2KHR
{-# INLINE vkAcquireNextImage2KHRSafe #-}
#endif
type HS_vkAcquireNextImage2KHR =
VkDevice
->
Ptr VkAcquireNextImageInfoKHR
-> Ptr Word32
-> IO VkResult
type PFN_vkAcquireNextImage2KHR = FunPtr HS_vkAcquireNextImage2KHR
foreign import ccall "dynamic" unwrapVkAcquireNextImage2KHR ::
PFN_vkAcquireNextImage2KHR -> HS_vkAcquireNextImage2KHR
instance VulkanProc "vkAcquireNextImage2KHR" where
type VkProcType "vkAcquireNextImage2KHR" =
HS_vkAcquireNextImage2KHR
vkProcSymbol :: CString
vkProcSymbol = CString
_VkAcquireNextImage2KHR
{-# INLINE vkProcSymbol #-}
unwrapVkProcPtr :: FunPtr (VkProcType VkAcquireNextImage2KHR)
-> VkProcType VkAcquireNextImage2KHR
unwrapVkProcPtr = FunPtr (VkProcType VkAcquireNextImage2KHR)
-> VkProcType VkAcquireNextImage2KHR
PFN_vkAcquireNextImage2KHR
-> VkDevice
-> Ptr VkAcquireNextImageInfoKHR
-> Ptr Word32
-> IO VkResult
unwrapVkAcquireNextImage2KHR
{-# INLINE unwrapVkProcPtr #-}
pattern VK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_CAPABILITIES_KHR ::
VkStructureType
pattern $bVK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_CAPABILITIES_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_CAPABILITIES_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_CAPABILITIES_KHR =
VkStructureType 1000060007
pattern VK_STRUCTURE_TYPE_IMAGE_SWAPCHAIN_CREATE_INFO_KHR ::
VkStructureType
pattern $bVK_STRUCTURE_TYPE_IMAGE_SWAPCHAIN_CREATE_INFO_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_IMAGE_SWAPCHAIN_CREATE_INFO_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_IMAGE_SWAPCHAIN_CREATE_INFO_KHR =
VkStructureType 1000060008
pattern VK_STRUCTURE_TYPE_BIND_IMAGE_MEMORY_SWAPCHAIN_INFO_KHR ::
VkStructureType
pattern $bVK_STRUCTURE_TYPE_BIND_IMAGE_MEMORY_SWAPCHAIN_INFO_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_BIND_IMAGE_MEMORY_SWAPCHAIN_INFO_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_BIND_IMAGE_MEMORY_SWAPCHAIN_INFO_KHR =
VkStructureType 1000060009
pattern VK_STRUCTURE_TYPE_ACQUIRE_NEXT_IMAGE_INFO_KHR ::
VkStructureType
pattern $bVK_STRUCTURE_TYPE_ACQUIRE_NEXT_IMAGE_INFO_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_ACQUIRE_NEXT_IMAGE_INFO_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_ACQUIRE_NEXT_IMAGE_INFO_KHR =
VkStructureType 1000060010
pattern VK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_INFO_KHR ::
VkStructureType
pattern $bVK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_INFO_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_INFO_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_DEVICE_GROUP_PRESENT_INFO_KHR =
VkStructureType 1000060011
pattern VK_STRUCTURE_TYPE_DEVICE_GROUP_SWAPCHAIN_CREATE_INFO_KHR ::
VkStructureType
pattern $bVK_STRUCTURE_TYPE_DEVICE_GROUP_SWAPCHAIN_CREATE_INFO_KHR :: VkStructureType
$mVK_STRUCTURE_TYPE_DEVICE_GROUP_SWAPCHAIN_CREATE_INFO_KHR :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_DEVICE_GROUP_SWAPCHAIN_CREATE_INFO_KHR =
VkStructureType 1000060012
pattern VK_SWAPCHAIN_CREATE_SPLIT_INSTANCE_BIND_REGIONS_BIT_KHR ::
VkSwapchainCreateFlagBitsKHR
pattern $bVK_SWAPCHAIN_CREATE_SPLIT_INSTANCE_BIND_REGIONS_BIT_KHR :: VkSwapchainCreateFlagBitsKHR
$mVK_SWAPCHAIN_CREATE_SPLIT_INSTANCE_BIND_REGIONS_BIT_KHR :: forall r.
VkSwapchainCreateFlagBitsKHR -> (Void# -> r) -> (Void# -> r) -> r
VK_SWAPCHAIN_CREATE_SPLIT_INSTANCE_BIND_REGIONS_BIT_KHR =
VkSwapchainCreateFlagBitsKHR 1
pattern VK_SWAPCHAIN_CREATE_PROTECTED_BIT_KHR ::
VkSwapchainCreateFlagBitsKHR
pattern $bVK_SWAPCHAIN_CREATE_PROTECTED_BIT_KHR :: VkSwapchainCreateFlagBitsKHR
$mVK_SWAPCHAIN_CREATE_PROTECTED_BIT_KHR :: forall r.
VkSwapchainCreateFlagBitsKHR -> (Void# -> r) -> (Void# -> r) -> r
VK_SWAPCHAIN_CREATE_PROTECTED_BIT_KHR =
VkSwapchainCreateFlagBitsKHR 2