diff options
| author | andromeda <andromeda@lenovo> | 2026-08-20 23:30:29 +0200 |
|---|---|---|
| committer | andromeda <andromeda@lenovo> | 2026-08-20 23:30:29 +0200 |
| commit | 09623556859dba8d3c8681867f6f5739e153a888 (patch) | |
| tree | cfc51f1fc09421b6052831a76da6846378149956 /Main.hs | |
| parent | eee13566610e714f3e00982c6793a867c87be4f5 (diff) | |
it drawsgit status -vgit status -vgit status -vgit status -vgit status -vgit status -v
Diffstat (limited to 'Main.hs')
| -rw-r--r-- | Main.hs | 10 |
1 files changed, 3 insertions, 7 deletions
@@ -83,19 +83,15 @@ instanceConfig exts = , Vk.enabledExtensionNames = exts } -deviceConfig :: Word32 -> Vk.DeviceCreateInfo '[Vk.PhysicalDeviceVulkan13Features, Vk.PhysicalDeviceVulkan12Features] +deviceConfig :: Word32 -> Vk.DeviceCreateInfo '[Vk.PhysicalDeviceVulkan13Features] deviceConfig gqueueIndex = - zero { Vk.next = (vkFeatures13, (vkFeatures12, ())) + zero { Vk.next = (vkFeatures13, ()) , Vk.queueCreateInfos = V.singleton $ SomeStruct zero { Vk.queueFamilyIndex = gqueueIndex , Vk.queuePriorities = V.singleton 1 } , Vk.enabledExtensionNames = extensions } -vkFeatures12 :: Vk.PhysicalDeviceVulkan12Features -vkFeatures12 = - zero - vkFeatures13 :: Vk.PhysicalDeviceVulkan13Features vkFeatures13 = zero { Vk.synchronization2 = True @@ -276,7 +272,7 @@ gameloop' dev q pipeline swapchain imageViews images cbuffers queue sImageAcquir , Vk.extent = q.surfaceCapabilities.currentExtent } Vk.cmdBindPipeline cbuffer Vk.PIPELINE_BIND_POINT_GRAPHICS pipeline - Vk.cmdDraw cbuffer 3 0 0 0 + Vk.cmdDraw cbuffer 3 1 0 0 Vk.cmdPipelineBarrier2 cbuffer $ zero { Vk.imageMemoryBarriers = V.singleton $ SomeStruct zero { Vk.srcStageMask = Vk.PIPELINE_STAGE_2_COLOR_ATTACHMENT_OUTPUT_BIT , Vk.srcAccessMask = Vk.ACCESS_2_COLOR_ATTACHMENT_WRITE_BIT , Vk.dstStageMask = Vk.PIPELINE_STAGE_2_NONE |
