gpu-vulkan 0.1.0.140 → 0.1.0.141

raw patch · 2 files changed

+4/−4 lines, 2 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Gpu.Vulkan.CommandBuffer: allocate :: forall (mn :: Maybe Type) (c :: [()]) sd scp a. (WithPoked (M mn), Length c, FromList c) => D sd -> AllocateInfo mn scp c -> (forall scb. () => LL (C scb) c -> IO a) -> IO a

+ Gpu.Vulkan.CommandBuffer: allocateCs :: forall (mn :: Maybe Type) (c :: [()]) sd scp a. (WithPoked (M mn), Length c, FromList c) => D sd -> AllocateInfo mn scp c -> (forall scb. () => LL (C scb) c -> IO a) -> IO a

gpu-vulkan.cabal view

@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack  name:           gpu-vulkan-version:        0.1.0.140+version:        0.1.0.141 synopsis:       Vulkan library description:    Please see the README on GitHub at <https://github.com/YoshikuniJujo/gpu-vulkan#readme> category:       GPU

src/Gpu/Vulkan/CommandBuffer.hs view

@@ -17,7 +17,7 @@  	-- ** Type Level List -	allocate, AllocateInfo(..),+	allocateCs, AllocateInfo(..),  	-- ** Value Level List @@ -47,11 +47,11 @@ import qualified Gpu.Vulkan.CommandPool.Type as CommandPool import qualified Gpu.Vulkan.CommandBuffer.Middle as M -allocate :: (+allocateCs :: ( 	WithPoked (TMaybe.M mn), TLength.Length c, HeteroParList.FromList c ) => 	Device.D sd -> AllocateInfo mn scp c -> 	(forall scb . HeteroParList.LL (C scb) c -> IO a) -> IO a-allocate (Device.D dvc) ai f = bracket+allocateCs (Device.D dvc) ai f = bracket 	(M.allocateCs dvc $ allocateInfoToMiddle ai) 	(M.freeCs dvc 		. (\(CommandPool.C cp) -> cp) $ allocateInfoCommandPool ai)