{-# OPTIONS_GHC -Wall -fno-warn-tabs #-} module Gpu.Vulkan.CommandPool.Type where import qualified Gpu.Vulkan.CommandPool.Middle as M newtype C s = C M.C deriving Int -> C s -> ShowS [C s] -> ShowS C s -> String (Int -> C s -> ShowS) -> (C s -> String) -> ([C s] -> ShowS) -> Show (C s) forall s. Int -> C s -> ShowS forall s. [C s] -> ShowS forall s. C s -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: forall s. Int -> C s -> ShowS showsPrec :: Int -> C s -> ShowS $cshow :: forall s. C s -> String show :: C s -> String $cshowList :: forall s. [C s] -> ShowS showList :: [C s] -> ShowS Show