packages feed

gpu-vulkan-middle 0.1.0.56 → 0.1.0.57

raw patch · 2 files changed

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

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Gpu.Vulkan.Image.Middle: CreateInfo :: M mn -> CreateFlags -> Type -> Format -> Extent3d -> Word32 -> Word32 -> CountFlagBits -> Tiling -> UsageFlags -> SharingMode -> [Word32] -> Layout -> CreateInfo (mn :: Maybe Type)
+ Gpu.Vulkan.Image.Middle: CreateInfo :: M mn -> CreateFlags -> Type -> Format -> Extent3d -> Word32 -> Word32 -> CountFlagBits -> Tiling -> UsageFlags -> SharingMode -> [Index] -> Layout -> CreateInfo (mn :: Maybe Type)
- Gpu.Vulkan.Image.Middle: [createInfoQueueFamilyIndices] :: CreateInfo (mn :: Maybe Type) -> [Word32]
+ Gpu.Vulkan.Image.Middle: [createInfoQueueFamilyIndices] :: CreateInfo (mn :: Maybe Type) -> [Index]
- Gpu.Vulkan.Image.Middle.Internal: CreateInfo :: M mn -> CreateFlags -> Type -> Format -> Extent3d -> Word32 -> Word32 -> CountFlagBits -> Tiling -> UsageFlags -> SharingMode -> [Word32] -> Layout -> CreateInfo (mn :: Maybe Type)
+ Gpu.Vulkan.Image.Middle.Internal: CreateInfo :: M mn -> CreateFlags -> Type -> Format -> Extent3d -> Word32 -> Word32 -> CountFlagBits -> Tiling -> UsageFlags -> SharingMode -> [Index] -> Layout -> CreateInfo (mn :: Maybe Type)
- Gpu.Vulkan.Image.Middle.Internal: [createInfoQueueFamilyIndices] :: CreateInfo (mn :: Maybe Type) -> [Word32]
+ Gpu.Vulkan.Image.Middle.Internal: [createInfoQueueFamilyIndices] :: CreateInfo (mn :: Maybe Type) -> [Index]

Files

gpu-vulkan-middle.cabal view
@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack  name:           gpu-vulkan-middle-version:        0.1.0.56+version:        0.1.0.57 synopsis:       Medium wrapper for Vulkan API description:    Please see the README on GitHub at <https://github.com/YoshikuniJujo/gpu-vulkan-middle#readme> category:       GPU
src/Gpu/Vulkan/Image/Middle/Internal.hs view
@@ -101,7 +101,7 @@ 	createInfoTiling :: Tiling, 	createInfoUsage :: UsageFlags, 	createInfoSharingMode :: SharingMode,-	createInfoQueueFamilyIndices :: [Word32],+	createInfoQueueFamilyIndices :: [QueueFamily.Index], 	createInfoInitialLayout :: Layout }  deriving instance Show (TMaybe.M mn) => Show (CreateInfo mn)@@ -120,7 +120,8 @@ 	createInfoTiling = Tiling tlng, 	createInfoUsage = UsageFlagBits usg, 	createInfoSharingMode = SharingMode sm,-	createInfoQueueFamilyIndices = length &&& id -> (qfic, qfis),+	createInfoQueueFamilyIndices =+		length &&& (QueueFamily.unIndex <$>) -> (qfic, qfis), 	createInfoInitialLayout = Layout lyt } f = 	withPoked' mnxt \pnxt -> withPtrS pnxt \(castPtr -> pnxt') -> 	allocaArray qfic \pqfis -> do