{-# LINE 1 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TupleSections #-}
{-# LANGUAGE PatternSynonyms, ViewPatterns #-}
{-# OPTIONS_GHC -Wall -fno-warn-tabs #-}
module Gpu.Vulkan.Sampler.Core (
create, destroy, S, PtrS, CreateInfo, pattern CreateInfo,
createInfoSType, createInfoPNext, createInfoFlags,
createInfoMagFilter, createInfoMinFilter, createInfoMipmapMode,
createInfoAddressModeU, createInfoAddressModeV, createInfoAddressModeW,
createInfoMipLodBias,
createInfoAnisotropyEnable, createInfoMaxAnisotropy,
createInfoCompareEnable, createInfoCompareOp,
createInfoMinLod, createInfoMaxLod,
createInfoBorderColor, createInfoUnnormalizedCoordinates
) where
import Foreign.Ptr
import Foreign.Storable
import Foreign.C.Struct
import Foreign.C.Struct.TypeSynonyms
import Data.Word
import Data.Int
import qualified Gpu.Vulkan.AllocationCallbacks.Core as AllocationCallbacks
import qualified Gpu.Vulkan.Device.Core as Device
data STag
type S = Ptr STag
type PtrS = Ptr S
sType :: Word32
{-# LINE 40 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
sType = 31
{-# LINE 41 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
struct "CreateInfo" (80)
{-# LINE 43 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
8 [
{-# LINE 44 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("sType", ''(), [| const $ pure () |],
[| \p _ -> (\hsc_ptr -> pokeByteOff hsc_ptr 0) p sType |]),
{-# LINE 46 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("pNext", ''PtrVoid,
[| (\hsc_ptr -> peekByteOff hsc_ptr 8) |],
{-# LINE 48 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 8) |]),
{-# LINE 49 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("flags", ''Word32,
{-# LINE 50 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 16) |],
{-# LINE 51 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 16) |]),
{-# LINE 52 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("magFilter", ''Word32,
{-# LINE 53 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 20) |],
{-# LINE 54 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 20) |]),
{-# LINE 55 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("minFilter", ''Word32,
{-# LINE 56 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 24) |],
{-# LINE 57 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 24) |]),
{-# LINE 58 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("mipmapMode", ''Word32,
{-# LINE 59 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 28) |],
{-# LINE 60 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 28) |]),
{-# LINE 61 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("addressModeU", ''Word32,
{-# LINE 62 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 32) |],
{-# LINE 63 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 32) |]),
{-# LINE 64 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("addressModeV", ''Word32,
{-# LINE 65 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 36) |],
{-# LINE 66 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 36) |]),
{-# LINE 67 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("addressModeW", ''Word32,
{-# LINE 68 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 40) |],
{-# LINE 69 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 40) |]),
{-# LINE 70 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("mipLodBias", ''Float,
{-# LINE 71 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 44) |],
{-# LINE 72 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 44) |]),
{-# LINE 73 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("anisotropyEnable", ''Word32,
{-# LINE 74 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 48) |],
{-# LINE 75 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 48) |]),
{-# LINE 76 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("maxAnisotropy", ''Float,
{-# LINE 77 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 52) |],
{-# LINE 78 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 52) |]),
{-# LINE 79 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("compareEnable", ''Word32,
{-# LINE 80 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 56) |],
{-# LINE 81 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 56) |]),
{-# LINE 82 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("compareOp", ''Word32,
{-# LINE 83 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 60) |],
{-# LINE 84 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 60) |]),
{-# LINE 85 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("minLod", ''Float,
{-# LINE 86 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 64) |],
{-# LINE 87 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 64) |]),
{-# LINE 88 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("maxLod", ''Float,
{-# LINE 89 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 68) |],
{-# LINE 90 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 68) |]),
{-# LINE 91 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("borderColor", ''Word32,
{-# LINE 92 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 72) |],
{-# LINE 93 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 72) |]),
{-# LINE 94 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
("unnormalizedCoordinates", ''Word32,
{-# LINE 95 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 76) |],
{-# LINE 96 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 76) |]) ]
{-# LINE 97 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
[''Show, ''Storable]
foreign import ccall "vkCreateSampler" create ::
Device.D -> Ptr CreateInfo -> Ptr AllocationCallbacks.A -> Ptr S ->
IO Int32
{-# LINE 102 "src/Gpu/Vulkan/Sampler/Core.hsc" #-}
foreign import ccall "vkDestroySampler" destroy ::
Device.D -> S -> Ptr AllocationCallbacks.A -> IO ()