WGPUCompareFunction.hs

{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE NoImplicitPrelude #-}

-- This file was generated by wgpu-raw-hs-codegen on:
--   2021-08-15T08:56:06.968390
-- Using wgpu-native git hash:
--   b10496e7eed9349f0fd541e6dfe5029cb436de74 wgpu-native (v0.9.2.2)

module WGPU.Raw.Generated.Enum.WGPUCompareFunction where

import Data.Word (Word32)
import Foreign (Storable)
import Prelude (Eq, Num, Show)

newtype WGPUCompareFunction = WGPUCompareFunction Word32
  deriving (Eq, Show, Num, Storable)

pattern Undefined :: forall a. (Eq a, Num a) => a
pattern Undefined = 0x00000000

pattern Never :: forall a. (Eq a, Num a) => a
pattern Never = 0x00000001

pattern Less :: forall a. (Eq a, Num a) => a
pattern Less = 0x00000002

pattern LessEqual :: forall a. (Eq a, Num a) => a
pattern LessEqual = 0x00000003

pattern Greater :: forall a. (Eq a, Num a) => a
pattern Greater = 0x00000004

pattern GreaterEqual :: forall a. (Eq a, Num a) => a
pattern GreaterEqual = 0x00000005

pattern Equal :: forall a. (Eq a, Num a) => a
pattern Equal = 0x00000006

pattern NotEqual :: forall a. (Eq a, Num a) => a
pattern NotEqual = 0x00000007

pattern Always :: forall a. (Eq a, Num a) => a
pattern Always = 0x00000008