{-# LINE 1 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TupleSections #-}
{-# LANGUAGE PatternSynonyms, ViewPatterns #-}
{-# OPTIONS_GHC -Wall -fno-warn-tabs #-}
module Gpu.Vulkan.Khr.Surface.Core (
destroy, S,
Capabilities, pattern Capabilities,
capabilitiesMinImageCount, capabilitiesMaxImageCount,
capabilitiesCurrentExtent,
capabilitiesMinImageExtent, capabilitiesMaxImageExtent,
capabilitiesMaxImageArrayLayers,
capabilitiesSupportedTransforms, capabilitiesCurrentTransform,
capabilitiesSupportedCompositeAlpha, capabilitiesSupportedUsageFlags,
Format, pattern Format, formatFormat, formatColorSpace
) where
import Foreign.Ptr
import Foreign.Storable
import Foreign.C.Struct
import Data.Word
import Gpu.Vulkan.Core (Extent2d)
import qualified Gpu.Vulkan.AllocationCallbacks.Core as AllocationCallbacks
import qualified Gpu.Vulkan.Instance.Core as Instance
data STag
type S = Ptr STag
foreign import ccall "vkDestroySurfaceKHR" destroy ::
Instance.I -> S -> Ptr AllocationCallbacks.A -> IO ()
struct "Capabilities" (52)
{-# LINE 47 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
4 [
{-# LINE 48 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("minImageCount", ''Word32,
{-# LINE 49 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 0) |],
{-# LINE 50 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 0) |]),
{-# LINE 51 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("maxImageCount", ''Word32,
{-# LINE 52 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 4) |],
{-# LINE 53 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 4) |]),
{-# LINE 54 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("currentExtent", ''Extent2d,
[| (\hsc_ptr -> peekByteOff hsc_ptr 8) |],
{-# LINE 56 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 8) |]),
{-# LINE 57 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("minImageExtent", ''Extent2d,
[| (\hsc_ptr -> peekByteOff hsc_ptr 16) |],
{-# LINE 59 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 16) |]),
{-# LINE 60 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("maxImageExtent", ''Extent2d,
[| (\hsc_ptr -> peekByteOff hsc_ptr 24) |],
{-# LINE 62 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 24) |]),
{-# LINE 63 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("maxImageArrayLayers", ''Word32,
{-# LINE 64 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 32) |],
{-# LINE 65 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 32) |]),
{-# LINE 66 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("supportedTransforms", ''Word32,
{-# LINE 67 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 36) |],
{-# LINE 68 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 36) |]),
{-# LINE 69 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("currentTransform", ''Word32,
{-# LINE 70 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 40) |],
{-# LINE 71 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 40) |]),
{-# LINE 72 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("supportedCompositeAlpha", ''Word32,
{-# LINE 73 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 44) |],
{-# LINE 74 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 44) |]),
{-# LINE 76 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("supportedUsageFlags", ''Word32,
{-# LINE 77 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 48) |],
{-# LINE 78 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 48) |]) ]
{-# LINE 79 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[''Show, ''Storable]
struct "Format" (8) 4 [
{-# LINE 82 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("format", ''Word32, [| (\hsc_ptr -> peekByteOff hsc_ptr 0) |],
{-# LINE 83 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 0) |]),
{-# LINE 84 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
("colorSpace", ''Word32,
{-# LINE 85 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> peekByteOff hsc_ptr 4) |],
{-# LINE 86 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[| (\hsc_ptr -> pokeByteOff hsc_ptr 4) |]) ]
{-# LINE 87 "src/Gpu/Vulkan/Khr/Surface/Core.hsc" #-}
[''Show, ''Storable]