{-# 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)

-- | > typedef struct VkDebugUtilsLabelEXT {
--   >     VkStructureType sType;
--   >     const void*                            pNext;
--   >     const char*      pLabelName;
--   >     float                  color[4];
--   > } VkDebugUtilsLabelEXT;
--
--   <https://www.khronos.org/registry/vulkan/specs/1.2-extensions/html/vkspec.html#VkDebugUtilsLabelEXT VkDebugUtilsLabelEXT registry at www.khronos.org>
type VkDebugUtilsLabelEXT = VkStruct VkDebugUtilsLabelEXT' -- ' closing tick for hsc2hs

data VkDebugUtilsLabelEXT' -- ' closing tick for hsc2hs

instance VulkanMarshal VkDebugUtilsLabelEXT where
    type StructRep VkDebugUtilsLabelEXT =
         'StructMeta "VkDebugUtilsLabelEXT" VkDebugUtilsLabelEXT  -- ' closing tick for hsc2hs
                                                                 (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  -- ' closing tick for hsc2hs
                                                        (0)
{-# LINE 33 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
                1
                'True -- ' closing tick for hsc2hs
                'True), -- ' closing tick for hsc2hs
             ('FieldMeta "pNext" (Ptr Void) 'False 
                                                   (8)
{-# LINE 38 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
                1
                'True -- ' closing tick for hsc2hs
                'True), -- ' closing tick for hsc2hs
             ('FieldMeta "pLabelName" CString 'False 
                                                     (16)
{-# LINE 43 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
                1
                'True -- ' closing tick for hsc2hs
                'True), -- ' closing tick for hsc2hs
             ('FieldMeta "color" ( -- ' closing tick for hsc2hs
                                  Float
{-# LINE 48 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
                                  ) 'True  -- ' closing tick for hsc2hs
                                          (24)
{-# LINE 50 "src-gen/Graphics/Vulkan/Types/Struct/DebugUtilsLabelEXT.hsc" #-}
                4
                'True -- ' closing tick for hsc2hs
                'True)] -- ' closing tick for hsc2hs
           'False -- ' closing tick for hsc2hs
           'False -- ' closing tick for hsc2hs
           '[] -- ' closing tick for hsc2hs