{-# LINE 1 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE Strict #-}
{-# LANGUAGE TypeFamilies #-}
module Graphics.Vulkan.Types.Struct.DebugUtilsLabelEXT
(VkDebugUtilsLabelEXT) where
import Graphics.Vulkan.Marshal
import Graphics.Vulkan.Marshal.Internal
import Graphics.Vulkan.Types.Enum.StructureType (VkStructureType)
type VkDebugUtilsLabelEXT = VkStruct VkDebugUtilsLabelEXT'
data VkDebugUtilsLabelEXT'
instance VulkanMarshal VkDebugUtilsLabelEXT where
type StructRep VkDebugUtilsLabelEXT =
'StructMeta "VkDebugUtilsLabelEXT" VkDebugUtilsLabelEXT
(40)
{-# LINE 30 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
8
{-# LINE 31 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
'[('FieldMeta "sType" VkStructureType 'False
(0)
{-# LINE 33 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
1
'True
'True),
('FieldMeta "pNext" (Ptr Void) 'False
(8)
{-# LINE 38 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
1
'True
'True),
('FieldMeta "pLabelName" CString 'False
(16)
{-# LINE 43 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
1
'True
'True),
('FieldMeta "color" (
Float
{-# LINE 48 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
) 'True
(24)
{-# LINE 50 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
4
'True
'True)]
'False
'False
'[]