{-# language CPP #-}
-- No documentation found for Chapter "PipelineCacheHeaderVersion"
module Vulkan.Core10.Enums.PipelineCacheHeaderVersion  (PipelineCacheHeaderVersion( PIPELINE_CACHE_HEADER_VERSION_ONE
                                                                                  , ..
                                                                                  )) where

import Vulkan.Internal.Utils (enumReadPrec)
import Vulkan.Internal.Utils (enumShowsPrec)
import GHC.Show (showsPrec)
import Vulkan.Zero (Zero)
import Foreign.Storable (Storable)
import Data.Int (Int32)
import GHC.Read (Read(readPrec))
import GHC.Show (Show(showsPrec))

-- | VkPipelineCacheHeaderVersion - Encode pipeline cache version
--
-- = See Also
--
-- 'Vulkan.Core10.PipelineCache.createPipelineCache',
-- 'Vulkan.Core10.PipelineCache.getPipelineCacheData'
newtype PipelineCacheHeaderVersion = PipelineCacheHeaderVersion Int32
  deriving newtype (PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
(PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool)
-> (PipelineCacheHeaderVersion
    -> PipelineCacheHeaderVersion -> Bool)
-> Eq PipelineCacheHeaderVersion
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
$c/= :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
== :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
$c== :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
Eq, Eq PipelineCacheHeaderVersion
Eq PipelineCacheHeaderVersion =>
(PipelineCacheHeaderVersion
 -> PipelineCacheHeaderVersion -> Ordering)
-> (PipelineCacheHeaderVersion
    -> PipelineCacheHeaderVersion -> Bool)
-> (PipelineCacheHeaderVersion
    -> PipelineCacheHeaderVersion -> Bool)
-> (PipelineCacheHeaderVersion
    -> PipelineCacheHeaderVersion -> Bool)
-> (PipelineCacheHeaderVersion
    -> PipelineCacheHeaderVersion -> Bool)
-> (PipelineCacheHeaderVersion
    -> PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion)
-> (PipelineCacheHeaderVersion
    -> PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion)
-> Ord PipelineCacheHeaderVersion
PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> Ordering
PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion
$cmin :: PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion
max :: PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion
$cmax :: PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion
>= :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
$c>= :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
> :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
$c> :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
<= :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
$c<= :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
< :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
$c< :: PipelineCacheHeaderVersion -> PipelineCacheHeaderVersion -> Bool
compare :: PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> Ordering
$ccompare :: PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> Ordering
$cp1Ord :: Eq PipelineCacheHeaderVersion
Ord, Ptr b -> Int -> IO PipelineCacheHeaderVersion
Ptr b -> Int -> PipelineCacheHeaderVersion -> IO ()
Ptr PipelineCacheHeaderVersion -> IO PipelineCacheHeaderVersion
Ptr PipelineCacheHeaderVersion
-> Int -> IO PipelineCacheHeaderVersion
Ptr PipelineCacheHeaderVersion
-> Int -> PipelineCacheHeaderVersion -> IO ()
Ptr PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> IO ()
PipelineCacheHeaderVersion -> Int
(PipelineCacheHeaderVersion -> Int)
-> (PipelineCacheHeaderVersion -> Int)
-> (Ptr PipelineCacheHeaderVersion
    -> Int -> IO PipelineCacheHeaderVersion)
-> (Ptr PipelineCacheHeaderVersion
    -> Int -> PipelineCacheHeaderVersion -> IO ())
-> (forall b. Ptr b -> Int -> IO PipelineCacheHeaderVersion)
-> (forall b. Ptr b -> Int -> PipelineCacheHeaderVersion -> IO ())
-> (Ptr PipelineCacheHeaderVersion
    -> IO PipelineCacheHeaderVersion)
-> (Ptr PipelineCacheHeaderVersion
    -> PipelineCacheHeaderVersion -> IO ())
-> Storable PipelineCacheHeaderVersion
forall b. Ptr b -> Int -> IO PipelineCacheHeaderVersion
forall b. Ptr b -> Int -> PipelineCacheHeaderVersion -> IO ()
forall a.
(a -> Int)
-> (a -> Int)
-> (Ptr a -> Int -> IO a)
-> (Ptr a -> Int -> a -> IO ())
-> (forall b. Ptr b -> Int -> IO a)
-> (forall b. Ptr b -> Int -> a -> IO ())
-> (Ptr a -> IO a)
-> (Ptr a -> a -> IO ())
-> Storable a
poke :: Ptr PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> IO ()
$cpoke :: Ptr PipelineCacheHeaderVersion
-> PipelineCacheHeaderVersion -> IO ()
peek :: Ptr PipelineCacheHeaderVersion -> IO PipelineCacheHeaderVersion
$cpeek :: Ptr PipelineCacheHeaderVersion -> IO PipelineCacheHeaderVersion
pokeByteOff :: Ptr b -> Int -> PipelineCacheHeaderVersion -> IO ()
$cpokeByteOff :: forall b. Ptr b -> Int -> PipelineCacheHeaderVersion -> IO ()
peekByteOff :: Ptr b -> Int -> IO PipelineCacheHeaderVersion
$cpeekByteOff :: forall b. Ptr b -> Int -> IO PipelineCacheHeaderVersion
pokeElemOff :: Ptr PipelineCacheHeaderVersion
-> Int -> PipelineCacheHeaderVersion -> IO ()
$cpokeElemOff :: Ptr PipelineCacheHeaderVersion
-> Int -> PipelineCacheHeaderVersion -> IO ()
peekElemOff :: Ptr PipelineCacheHeaderVersion
-> Int -> IO PipelineCacheHeaderVersion
$cpeekElemOff :: Ptr PipelineCacheHeaderVersion
-> Int -> IO PipelineCacheHeaderVersion
alignment :: PipelineCacheHeaderVersion -> Int
$calignment :: PipelineCacheHeaderVersion -> Int
sizeOf :: PipelineCacheHeaderVersion -> Int
$csizeOf :: PipelineCacheHeaderVersion -> Int
Storable, PipelineCacheHeaderVersion
PipelineCacheHeaderVersion -> Zero PipelineCacheHeaderVersion
forall a. a -> Zero a
zero :: PipelineCacheHeaderVersion
$czero :: PipelineCacheHeaderVersion
Zero)
-- Note that the zero instance does not produce a valid value, passing 'zero' to Vulkan will result in an error

-- | 'PIPELINE_CACHE_HEADER_VERSION_ONE' specifies version one of the
-- pipeline cache.
pattern $bPIPELINE_CACHE_HEADER_VERSION_ONE :: PipelineCacheHeaderVersion
$mPIPELINE_CACHE_HEADER_VERSION_ONE :: forall r.
PipelineCacheHeaderVersion -> (Void# -> r) -> (Void# -> r) -> r
PIPELINE_CACHE_HEADER_VERSION_ONE = PipelineCacheHeaderVersion 1
{-# complete PIPELINE_CACHE_HEADER_VERSION_ONE :: PipelineCacheHeaderVersion #-}

conNamePipelineCacheHeaderVersion :: String
conNamePipelineCacheHeaderVersion :: String
conNamePipelineCacheHeaderVersion = "PipelineCacheHeaderVersion"

enumPrefixPipelineCacheHeaderVersion :: String
enumPrefixPipelineCacheHeaderVersion :: String
enumPrefixPipelineCacheHeaderVersion = "PIPELINE_CACHE_HEADER_VERSION_ONE"

showTablePipelineCacheHeaderVersion :: [(PipelineCacheHeaderVersion, String)]
showTablePipelineCacheHeaderVersion :: [(PipelineCacheHeaderVersion, String)]
showTablePipelineCacheHeaderVersion = [(PipelineCacheHeaderVersion
PIPELINE_CACHE_HEADER_VERSION_ONE, "")]

instance Show PipelineCacheHeaderVersion where
  showsPrec :: Int -> PipelineCacheHeaderVersion -> ShowS
showsPrec = String
-> [(PipelineCacheHeaderVersion, String)]
-> String
-> (PipelineCacheHeaderVersion -> Int32)
-> (Int32 -> ShowS)
-> Int
-> PipelineCacheHeaderVersion
-> ShowS
forall a i.
Eq a =>
String
-> [(a, String)]
-> String
-> (a -> i)
-> (i -> ShowS)
-> Int
-> a
-> ShowS
enumShowsPrec String
enumPrefixPipelineCacheHeaderVersion
                            [(PipelineCacheHeaderVersion, String)]
showTablePipelineCacheHeaderVersion
                            String
conNamePipelineCacheHeaderVersion
                            (\(PipelineCacheHeaderVersion x :: Int32
x) -> Int32
x)
                            (Int -> Int32 -> ShowS
forall a. Show a => Int -> a -> ShowS
showsPrec 11)

instance Read PipelineCacheHeaderVersion where
  readPrec :: ReadPrec PipelineCacheHeaderVersion
readPrec = String
-> [(PipelineCacheHeaderVersion, String)]
-> String
-> (Int32 -> PipelineCacheHeaderVersion)
-> ReadPrec PipelineCacheHeaderVersion
forall i a.
Read i =>
String -> [(a, String)] -> String -> (i -> a) -> ReadPrec a
enumReadPrec String
enumPrefixPipelineCacheHeaderVersion
                          [(PipelineCacheHeaderVersion, String)]
showTablePipelineCacheHeaderVersion
                          String
conNamePipelineCacheHeaderVersion
                          Int32 -> PipelineCacheHeaderVersion
PipelineCacheHeaderVersion