{-# LINE 1 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TupleSections #-}
{-# LANGUAGE PatternSynonyms, ViewPatterns #-}
{-# OPTIONS_GHC -Wall -fno-warn-tabs #-}
module Gpu.Vulkan.VertexInput.Core (
BindingDescription, PtrBindingDescription, pattern BindingDescription,
bindingDescriptionBinding, bindingDescriptionStride,
bindingDescriptionInputRate,
AttributeDescription, PtrAttributeDescription,
pattern AttributeDescription,
attributeDescriptionLocation, attributeDescriptionBinding,
attributeDescriptionFormat, attributeDescriptionOffset
) where
import Foreign.Ptr
import Foreign.Storable
import Foreign.C.Struct
import Data.Word
struct "BindingDescription" (12)
{-# LINE 31 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
4 [
{-# LINE 32 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
("binding", ''Word32,
{-# LINE 33 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 0) |],
{-# LINE 34 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 0) |]),
{-# LINE 35 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
("stride", ''Word32,
{-# LINE 36 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 4) |],
{-# LINE 37 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 4) |]),
{-# LINE 38 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
("inputRate", ''Word32,
{-# LINE 39 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 8) |],
{-# LINE 40 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 8) |]) ]
{-# LINE 41 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[''Show, ''Storable]
type PtrBindingDescription = Ptr BindingDescription
struct "AttributeDescription" (16)
{-# LINE 46 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
4 [
{-# LINE 47 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
("location", ''Word32,
{-# LINE 48 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 0) |],
{-# LINE 49 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 0) |]),
{-# LINE 50 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
("binding", ''Word32,
{-# LINE 51 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 4) |],
{-# LINE 52 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 4) |]),
{-# LINE 53 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
("format", ''Word32,
{-# LINE 54 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 8) |],
{-# LINE 55 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 8) |]),
{-# LINE 56 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
("offset", ''Word32,
{-# LINE 57 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 12) |],
{-# LINE 58 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 12) |]) ]
{-# LINE 59 "src/Gpu/Vulkan/VertexInput/Core.hsc" #-}
[''Show, ''Storable]
type PtrAttributeDescription = Ptr AttributeDescription