{-# OPTIONS_GHC -fno-warn-missing-pattern-synonym-signatures#-}
{-# 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_EXT_validation_cache
       (-- * Vulkan extension: @VK_EXT_validation_cache@
        -- |
        --
        -- supported: @vulkan@
        --
        -- contact: @Cort Stratton @cdwfs@
        --
        -- author: @GOOGLE@
        --
        -- type: @device@
        --
        -- Extension number: @161@
        module Graphics.Vulkan.Marshal,
        module Graphics.Vulkan.Types.BaseTypes,
        module Graphics.Vulkan.Types.Bitmasks,
        module Graphics.Vulkan.Types.Struct.Shader,
        module Graphics.Vulkan.Types.Enum.StructureType,
        module Graphics.Vulkan.Types.Struct.Validation,
        module Graphics.Vulkan.Types.Enum.ValidationC,
        -- > #include "vk_platform.h"
        VkCreateValidationCacheEXT, pattern VkCreateValidationCacheEXT,
        HS_vkCreateValidationCacheEXT, PFN_vkCreateValidationCacheEXT,
        VkDestroyValidationCacheEXT, pattern VkDestroyValidationCacheEXT,
        HS_vkDestroyValidationCacheEXT, PFN_vkDestroyValidationCacheEXT,
        VkMergeValidationCachesEXT, pattern VkMergeValidationCachesEXT,
        HS_vkMergeValidationCachesEXT, PFN_vkMergeValidationCachesEXT,
        VkGetValidationCacheDataEXT, pattern VkGetValidationCacheDataEXT,
        HS_vkGetValidationCacheDataEXT, PFN_vkGetValidationCacheDataEXT,
        module Graphics.Vulkan.Types.Enum.InternalAllocationType,
        module Graphics.Vulkan.Types.Enum.Result,
        module Graphics.Vulkan.Types.Enum.SystemAllocationScope,
        module Graphics.Vulkan.Types.Funcpointers,
        module Graphics.Vulkan.Types.Handles,
        module Graphics.Vulkan.Types.Struct.AllocationCallbacks,
        VK_EXT_VALIDATION_CACHE_SPEC_VERSION,
        pattern VK_EXT_VALIDATION_CACHE_SPEC_VERSION,
        VK_EXT_VALIDATION_CACHE_EXTENSION_NAME,
        pattern VK_EXT_VALIDATION_CACHE_EXTENSION_NAME,
        pattern VK_STRUCTURE_TYPE_VALIDATION_CACHE_CREATE_INFO_EXT,
        pattern VK_STRUCTURE_TYPE_SHADER_MODULE_VALIDATION_CACHE_CREATE_INFO_EXT,
        pattern VK_OBJECT_TYPE_VALIDATION_CACHE_EXT,
        pattern VK_DEBUG_REPORT_OBJECT_TYPE_VALIDATION_CACHE_EXT)
       where
import           GHC.Ptr                                           (Ptr (..))
import           Graphics.Vulkan.Marshal
import           Graphics.Vulkan.Marshal.Proc                      (VulkanProc (..))
import           Graphics.Vulkan.Types.BaseTypes
import           Graphics.Vulkan.Types.Bitmasks
import           Graphics.Vulkan.Types.Enum.Debug                  (VkDebugReportObjectTypeEXT (..))
import           Graphics.Vulkan.Types.Enum.InternalAllocationType
import           Graphics.Vulkan.Types.Enum.Object                 (VkObjectType (..))
import           Graphics.Vulkan.Types.Enum.Result
import           Graphics.Vulkan.Types.Enum.StructureType
import           Graphics.Vulkan.Types.Enum.SystemAllocationScope
import           Graphics.Vulkan.Types.Enum.ValidationC
import           Graphics.Vulkan.Types.Funcpointers
import           Graphics.Vulkan.Types.Handles
import           Graphics.Vulkan.Types.Struct.AllocationCallbacks
import           Graphics.Vulkan.Types.Struct.Shader
import           Graphics.Vulkan.Types.Struct.Validation

pattern VkCreateValidationCacheEXT :: CString

pattern $bVkCreateValidationCacheEXT :: CString
$mVkCreateValidationCacheEXT :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkCreateValidationCacheEXT <-
        (is_VkCreateValidationCacheEXT -> True)
  where VkCreateValidationCacheEXT = CString
_VkCreateValidationCacheEXT

{-# INLINE _VkCreateValidationCacheEXT #-}

_VkCreateValidationCacheEXT :: CString
_VkCreateValidationCacheEXT :: CString
_VkCreateValidationCacheEXT = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkCreateValidationCacheEXT\NUL"#

{-# INLINE is_VkCreateValidationCacheEXT #-}

is_VkCreateValidationCacheEXT :: CString -> Bool
is_VkCreateValidationCacheEXT :: CString -> Bool
is_VkCreateValidationCacheEXT
  = (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
_VkCreateValidationCacheEXT

type VkCreateValidationCacheEXT = "vkCreateValidationCacheEXT"

-- | Success codes: 'VK_SUCCESS'.
--
--   Error codes: 'VK_ERROR_OUT_OF_HOST_MEMORY'.
--
--   > VkResult vkCreateValidationCacheEXT
--   >     ( VkDevice device
--   >     , const VkValidationCacheCreateInfoEXT* pCreateInfo
--   >     , const VkAllocationCallbacks* pAllocator
--   >     , VkValidationCacheEXT* pValidationCache
--   >     )
--
--   <https://www.khronos.org/registry/vulkan/specs/1.1-extensions/html/vkspec.html#vkCreateValidationCacheEXT vkCreateValidationCacheEXT registry at www.khronos.org>
type HS_vkCreateValidationCacheEXT =
     VkDevice -- ^ device
              ->
       Ptr VkValidationCacheCreateInfoEXT -- ^ pCreateInfo
                                          ->
         Ptr VkAllocationCallbacks -- ^ pAllocator
                                   ->
           Ptr VkValidationCacheEXT -- ^ pValidationCache
                                    -> IO VkResult

type PFN_vkCreateValidationCacheEXT =
     FunPtr HS_vkCreateValidationCacheEXT

foreign import ccall "dynamic" unwrapVkCreateValidationCacheEXT ::
               PFN_vkCreateValidationCacheEXT -> HS_vkCreateValidationCacheEXT

instance VulkanProc "vkCreateValidationCacheEXT" where
        type VkProcType "vkCreateValidationCacheEXT" =
             HS_vkCreateValidationCacheEXT
        vkProcSymbol :: CString
vkProcSymbol = CString
_VkCreateValidationCacheEXT

        {-# INLINE vkProcSymbol #-}
        unwrapVkProcPtr :: FunPtr (VkProcType "vkCreateValidationCacheEXT")
-> VkProcType "vkCreateValidationCacheEXT"
unwrapVkProcPtr = FunPtr (VkProcType "vkCreateValidationCacheEXT")
-> VkProcType "vkCreateValidationCacheEXT"
PFN_vkCreateValidationCacheEXT -> HS_vkCreateValidationCacheEXT
unwrapVkCreateValidationCacheEXT

        {-# INLINE unwrapVkProcPtr #-}

pattern VkDestroyValidationCacheEXT :: CString

pattern $bVkDestroyValidationCacheEXT :: CString
$mVkDestroyValidationCacheEXT :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkDestroyValidationCacheEXT <-
        (is_VkDestroyValidationCacheEXT -> True)
  where VkDestroyValidationCacheEXT = CString
_VkDestroyValidationCacheEXT

{-# INLINE _VkDestroyValidationCacheEXT #-}

_VkDestroyValidationCacheEXT :: CString
_VkDestroyValidationCacheEXT :: CString
_VkDestroyValidationCacheEXT
  = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkDestroyValidationCacheEXT\NUL"#

{-# INLINE is_VkDestroyValidationCacheEXT #-}

is_VkDestroyValidationCacheEXT :: CString -> Bool
is_VkDestroyValidationCacheEXT :: CString -> Bool
is_VkDestroyValidationCacheEXT
  = (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
_VkDestroyValidationCacheEXT

type VkDestroyValidationCacheEXT = "vkDestroyValidationCacheEXT"

-- | > void vkDestroyValidationCacheEXT
--   >     ( VkDevice device
--   >     , VkValidationCacheEXT validationCache
--   >     , const VkAllocationCallbacks* pAllocator
--   >     )
--
--   <https://www.khronos.org/registry/vulkan/specs/1.1-extensions/html/vkspec.html#vkDestroyValidationCacheEXT vkDestroyValidationCacheEXT registry at www.khronos.org>
type HS_vkDestroyValidationCacheEXT =
     VkDevice -- ^ device
              ->
       VkValidationCacheEXT -- ^ validationCache
                            -> Ptr VkAllocationCallbacks -- ^ pAllocator
                                                         -> IO ()

type PFN_vkDestroyValidationCacheEXT =
     FunPtr HS_vkDestroyValidationCacheEXT

foreign import ccall "dynamic" unwrapVkDestroyValidationCacheEXT ::
               PFN_vkDestroyValidationCacheEXT -> HS_vkDestroyValidationCacheEXT

instance VulkanProc "vkDestroyValidationCacheEXT" where
        type VkProcType "vkDestroyValidationCacheEXT" =
             HS_vkDestroyValidationCacheEXT
        vkProcSymbol :: CString
vkProcSymbol = CString
_VkDestroyValidationCacheEXT

        {-# INLINE vkProcSymbol #-}
        unwrapVkProcPtr :: FunPtr (VkProcType "vkDestroyValidationCacheEXT")
-> VkProcType "vkDestroyValidationCacheEXT"
unwrapVkProcPtr = FunPtr (VkProcType "vkDestroyValidationCacheEXT")
-> VkProcType "vkDestroyValidationCacheEXT"
PFN_vkDestroyValidationCacheEXT -> HS_vkDestroyValidationCacheEXT
unwrapVkDestroyValidationCacheEXT

        {-# INLINE unwrapVkProcPtr #-}

pattern VkMergeValidationCachesEXT :: CString

pattern $bVkMergeValidationCachesEXT :: CString
$mVkMergeValidationCachesEXT :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkMergeValidationCachesEXT <-
        (is_VkMergeValidationCachesEXT -> True)
  where VkMergeValidationCachesEXT = CString
_VkMergeValidationCachesEXT

{-# INLINE _VkMergeValidationCachesEXT #-}

_VkMergeValidationCachesEXT :: CString
_VkMergeValidationCachesEXT :: CString
_VkMergeValidationCachesEXT = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkMergeValidationCachesEXT\NUL"#

{-# INLINE is_VkMergeValidationCachesEXT #-}

is_VkMergeValidationCachesEXT :: CString -> Bool
is_VkMergeValidationCachesEXT :: CString -> Bool
is_VkMergeValidationCachesEXT
  = (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
_VkMergeValidationCachesEXT

type VkMergeValidationCachesEXT = "vkMergeValidationCachesEXT"

-- | Success codes: 'VK_SUCCESS'.
--
--   Error codes: 'VK_ERROR_OUT_OF_HOST_MEMORY', 'VK_ERROR_OUT_OF_DEVICE_MEMORY'.
--
--   > VkResult vkMergeValidationCachesEXT
--   >     ( VkDevice device
--   >     , VkValidationCacheEXT dstCache
--   >     , uint32_t srcCacheCount
--   >     , const VkValidationCacheEXT* pSrcCaches
--   >     )
--
--   <https://www.khronos.org/registry/vulkan/specs/1.1-extensions/html/vkspec.html#vkMergeValidationCachesEXT vkMergeValidationCachesEXT registry at www.khronos.org>
type HS_vkMergeValidationCachesEXT =
     VkDevice -- ^ device
              ->
       VkValidationCacheEXT -- ^ dstCache
                            ->
         Word32 -- ^ srcCacheCount
                -> Ptr VkValidationCacheEXT -- ^ pSrcCaches
                                            -> IO VkResult

type PFN_vkMergeValidationCachesEXT =
     FunPtr HS_vkMergeValidationCachesEXT

foreign import ccall "dynamic" unwrapVkMergeValidationCachesEXT ::
               PFN_vkMergeValidationCachesEXT -> HS_vkMergeValidationCachesEXT

instance VulkanProc "vkMergeValidationCachesEXT" where
        type VkProcType "vkMergeValidationCachesEXT" =
             HS_vkMergeValidationCachesEXT
        vkProcSymbol :: CString
vkProcSymbol = CString
_VkMergeValidationCachesEXT

        {-# INLINE vkProcSymbol #-}
        unwrapVkProcPtr :: FunPtr (VkProcType "vkMergeValidationCachesEXT")
-> VkProcType "vkMergeValidationCachesEXT"
unwrapVkProcPtr = FunPtr (VkProcType "vkMergeValidationCachesEXT")
-> VkProcType "vkMergeValidationCachesEXT"
PFN_vkMergeValidationCachesEXT -> HS_vkMergeValidationCachesEXT
unwrapVkMergeValidationCachesEXT

        {-# INLINE unwrapVkProcPtr #-}

pattern VkGetValidationCacheDataEXT :: CString

pattern $bVkGetValidationCacheDataEXT :: CString
$mVkGetValidationCacheDataEXT :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VkGetValidationCacheDataEXT <-
        (is_VkGetValidationCacheDataEXT -> True)
  where VkGetValidationCacheDataEXT = CString
_VkGetValidationCacheDataEXT

{-# INLINE _VkGetValidationCacheDataEXT #-}

_VkGetValidationCacheDataEXT :: CString
_VkGetValidationCacheDataEXT :: CString
_VkGetValidationCacheDataEXT
  = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"vkGetValidationCacheDataEXT\NUL"#

{-# INLINE is_VkGetValidationCacheDataEXT #-}

is_VkGetValidationCacheDataEXT :: CString -> Bool
is_VkGetValidationCacheDataEXT :: CString -> Bool
is_VkGetValidationCacheDataEXT
  = (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
_VkGetValidationCacheDataEXT

type VkGetValidationCacheDataEXT = "vkGetValidationCacheDataEXT"

-- | Success codes: 'VK_SUCCESS', 'VK_INCOMPLETE'.
--
--   Error codes: 'VK_ERROR_OUT_OF_HOST_MEMORY', 'VK_ERROR_OUT_OF_DEVICE_MEMORY'.
--
--   > VkResult vkGetValidationCacheDataEXT
--   >     ( VkDevice device
--   >     , VkValidationCacheEXT validationCache
--   >     , size_t* pDataSize
--   >     , void* pData
--   >     )
--
--   <https://www.khronos.org/registry/vulkan/specs/1.1-extensions/html/vkspec.html#vkGetValidationCacheDataEXT vkGetValidationCacheDataEXT registry at www.khronos.org>
type HS_vkGetValidationCacheDataEXT =
     VkDevice -- ^ device
              ->
       VkValidationCacheEXT -- ^ validationCache
                            -> Ptr CSize -- ^ pDataSize
                                         -> Ptr Void -- ^ pData
                                                     -> IO VkResult

type PFN_vkGetValidationCacheDataEXT =
     FunPtr HS_vkGetValidationCacheDataEXT

foreign import ccall "dynamic" unwrapVkGetValidationCacheDataEXT ::
               PFN_vkGetValidationCacheDataEXT -> HS_vkGetValidationCacheDataEXT

instance VulkanProc "vkGetValidationCacheDataEXT" where
        type VkProcType "vkGetValidationCacheDataEXT" =
             HS_vkGetValidationCacheDataEXT
        vkProcSymbol :: CString
vkProcSymbol = CString
_VkGetValidationCacheDataEXT

        {-# INLINE vkProcSymbol #-}
        unwrapVkProcPtr :: FunPtr (VkProcType "vkGetValidationCacheDataEXT")
-> VkProcType "vkGetValidationCacheDataEXT"
unwrapVkProcPtr = FunPtr (VkProcType "vkGetValidationCacheDataEXT")
-> VkProcType "vkGetValidationCacheDataEXT"
PFN_vkGetValidationCacheDataEXT -> HS_vkGetValidationCacheDataEXT
unwrapVkGetValidationCacheDataEXT

        {-# INLINE unwrapVkProcPtr #-}

pattern VK_EXT_VALIDATION_CACHE_SPEC_VERSION :: (Num a, Eq a) => a

pattern $bVK_EXT_VALIDATION_CACHE_SPEC_VERSION :: a
$mVK_EXT_VALIDATION_CACHE_SPEC_VERSION :: forall r a. (Num a, Eq a) => a -> (Void# -> r) -> (Void# -> r) -> r
VK_EXT_VALIDATION_CACHE_SPEC_VERSION = 1

type VK_EXT_VALIDATION_CACHE_SPEC_VERSION = 1

pattern VK_EXT_VALIDATION_CACHE_EXTENSION_NAME :: CString

pattern $bVK_EXT_VALIDATION_CACHE_EXTENSION_NAME :: CString
$mVK_EXT_VALIDATION_CACHE_EXTENSION_NAME :: forall r. CString -> (Void# -> r) -> (Void# -> r) -> r
VK_EXT_VALIDATION_CACHE_EXTENSION_NAME <-
        (is_VK_EXT_VALIDATION_CACHE_EXTENSION_NAME -> True)
  where VK_EXT_VALIDATION_CACHE_EXTENSION_NAME
          = CString
_VK_EXT_VALIDATION_CACHE_EXTENSION_NAME

{-# INLINE _VK_EXT_VALIDATION_CACHE_EXTENSION_NAME #-}

_VK_EXT_VALIDATION_CACHE_EXTENSION_NAME :: CString
_VK_EXT_VALIDATION_CACHE_EXTENSION_NAME :: CString
_VK_EXT_VALIDATION_CACHE_EXTENSION_NAME
  = Addr# -> CString
forall a. Addr# -> Ptr a
Ptr Addr#
"VK_EXT_validation_cache\NUL"#

{-# INLINE is_VK_EXT_VALIDATION_CACHE_EXTENSION_NAME #-}

is_VK_EXT_VALIDATION_CACHE_EXTENSION_NAME :: CString -> Bool
is_VK_EXT_VALIDATION_CACHE_EXTENSION_NAME :: CString -> Bool
is_VK_EXT_VALIDATION_CACHE_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_EXT_VALIDATION_CACHE_EXTENSION_NAME

type VK_EXT_VALIDATION_CACHE_EXTENSION_NAME =
     "VK_EXT_validation_cache"

pattern VK_STRUCTURE_TYPE_VALIDATION_CACHE_CREATE_INFO_EXT ::
        VkStructureType

pattern $bVK_STRUCTURE_TYPE_VALIDATION_CACHE_CREATE_INFO_EXT :: VkStructureType
$mVK_STRUCTURE_TYPE_VALIDATION_CACHE_CREATE_INFO_EXT :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_VALIDATION_CACHE_CREATE_INFO_EXT =
        VkStructureType 1000160000

pattern VK_STRUCTURE_TYPE_SHADER_MODULE_VALIDATION_CACHE_CREATE_INFO_EXT
        :: VkStructureType

pattern $bVK_STRUCTURE_TYPE_SHADER_MODULE_VALIDATION_CACHE_CREATE_INFO_EXT :: VkStructureType
$mVK_STRUCTURE_TYPE_SHADER_MODULE_VALIDATION_CACHE_CREATE_INFO_EXT :: forall r. VkStructureType -> (Void# -> r) -> (Void# -> r) -> r
VK_STRUCTURE_TYPE_SHADER_MODULE_VALIDATION_CACHE_CREATE_INFO_EXT
        = VkStructureType 1000160001

-- | VkValidationCacheEXT
pattern VK_OBJECT_TYPE_VALIDATION_CACHE_EXT :: VkObjectType

pattern $bVK_OBJECT_TYPE_VALIDATION_CACHE_EXT :: VkObjectType
$mVK_OBJECT_TYPE_VALIDATION_CACHE_EXT :: forall r. VkObjectType -> (Void# -> r) -> (Void# -> r) -> r
VK_OBJECT_TYPE_VALIDATION_CACHE_EXT =
        VkObjectType 1000160000

pattern $bVK_DEBUG_REPORT_OBJECT_TYPE_VALIDATION_CACHE_EXT :: VkDebugReportObjectTypeEXT
$mVK_DEBUG_REPORT_OBJECT_TYPE_VALIDATION_CACHE_EXT :: forall r.
VkDebugReportObjectTypeEXT -> (Void# -> r) -> (Void# -> r) -> r
VK_DEBUG_REPORT_OBJECT_TYPE_VALIDATION_CACHE_EXT =
        VK_DEBUG_REPORT_OBJECT_TYPE_VALIDATION_CACHE_EXT_EXT