{-# LINE 1 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TupleSections #-}
{-# LANGUAGE PatternSynonyms, ViewPatterns #-}
{-# OPTIONS_GHC -Wall -fno-warn-tabs #-}
module Gpu.Vulkan.Pipeline.VertexInputState.Core (
CreateInfo, PtrCreateInfo, pattern CreateInfo,
createInfoSType, createInfoPNext, createInfoFlags,
createInfoVertexBindingDescriptionCount,
createInfoPVertexBindingDescriptions,
createInfoVertexAttributeDescriptionCount,
createInfoPVertexAttributeDescriptions
) where
import Foreign.Ptr
import Foreign.Storable
import Foreign.C.Struct
import Foreign.C.Struct.TypeSynonyms
import Data.Word
import qualified Gpu.Vulkan.VertexInput.Core as VertexInput
sType :: Word32
{-# LINE 30 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
sType = 19
{-# LINE 31 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
struct "CreateInfo" (48)
{-# LINE 33 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
8 [
{-# LINE 34 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
("sType", ''(), [| const $ pure () |],
[| \p _ -> (\hsc_ptr -> pokeByteOff hsc_ptr 0)
{-# LINE 36 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
p sType |]),
("pNext", ''PtrVoid,
[| (\hsc_ptr -> peekByteOff hsc_ptr 8) |],
{-# LINE 39 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 8) |]),
{-# LINE 40 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
("flags", ''Word32,
{-# LINE 41 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 16) |],
{-# LINE 42 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 16) |]),
{-# LINE 43 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
("vertexBindingDescriptionCount", ''Word32,
{-# LINE 44 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 20) |],
{-# LINE 46 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 20) |]),
{-# LINE 48 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
("pVertexBindingDescriptions", ''VertexInput.PtrBindingDescription,
[| (\hsc_ptr -> peekByteOff hsc_ptr 24) |],
{-# LINE 51 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 24) |]),
{-# LINE 53 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
("vertexAttributeDescriptionCount", ''Word32,
{-# LINE 54 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 32) |],
{-# LINE 56 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 32) |]),
{-# LINE 58 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
("pVertexAttributeDescriptions", ''VertexInput.PtrAttributeDescription,
[| (\hsc_ptr -> peekByteOff hsc_ptr 40) |],
{-# LINE 61 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 40) |]) ]
{-# LINE 63 "src/Gpu/Vulkan/Pipeline/VertexInputState/Core.hsc" #-}
[''Show, ''Storable]
type PtrCreateInfo = Ptr CreateInfo