{-# LINE 1 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE TupleSections #-} {-# LANGUAGE PatternSynonyms, ViewPatterns #-} {-# OPTIONS_GHC -Wall -fno-warn-tabs #-} module Gpu.Vulkan.DescriptorSetLayout.BindingFlags.Core ( CreateInfo, pattern CreateInfo, BPtr, createInfoSType, createInfoPNext, createInfoBindingCount, createInfoPBindingFlags ) where import Foreign.Ptr import Foreign.Storable import Foreign.C.Struct import Foreign.C.Struct.TypeSynonyms import Data.Word sType :: Word32 {-# LINE 20 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} sType = 1000161000 {-# LINE 22 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} type BPtr = Ptr Word32 {-# LINE 24 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} struct "CreateInfo" (32) {-# LINE 26 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} 8 [ {-# LINE 27 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} ("sType", ''(), [| const $ pure () |], [| \p _ -> (\hsc_ptr -> pokeByteOff hsc_ptr 0) {-# LINE 31 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} p sType |]), ("pNext", ''PtrVoid, [| (\hsc_ptr -> peekByteOff hsc_ptr 8) |], {-# LINE 35 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 8) |]), {-# LINE 37 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} ("bindingCount", ''Word32, {-# LINE 38 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 16) |], {-# LINE 40 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 16) |]), {-# LINE 42 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} ("pBindingFlags", ''BPtr, [| (\hsc_ptr -> peekByteOff hsc_ptr 24) |], {-# LINE 45 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 24) |]) ] {-# LINE 47 "src/Gpu/Vulkan/DescriptorSetLayout/BindingFlags/Core.hsc" #-} [''Show, ''Storable]