From 1643d8b3db9f2cbcfced9680c9ae521df4bf4d51 Mon Sep 17 00:00:00 2001 From: nek0 Date: Sat, 29 Apr 2023 18:56:07 +0200 Subject: [PATCH] more cleanup --- src/CommandBuffer.hs | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/src/CommandBuffer.hs b/src/CommandBuffer.hs index 8d989f6..c98ffda 100644 --- a/src/CommandBuffer.hs +++ b/src/CommandBuffer.hs @@ -212,7 +212,7 @@ recordCommandBuffer Vk.cmdUseRenderPass commandBuffer renderPassInfo Vk.SUBPASS_CONTENTS_INLINE $ do liftIO $ - prepareRecording width height commandBuffer renderPass frameBuffer graphicsPipeline + prepareRecording width height commandBuffer graphicsPipeline renderObjects <- (liftIO . STM.atomically . STM.readTMVar) =<< asks renderables meshMap <- (liftIO . STM.atomically . STM.readTMVar) =<< asks meshLibrary @@ -274,11 +274,9 @@ prepareRecording :: CInt -> CInt -> Vk.CommandBuffer - -> Vk.RenderPass - -> Vk.Framebuffer -> Vk.Pipeline -> IO () -prepareRecording width height commandBuffer renderPass frameBuffer graphicsPipeline = do +prepareRecording width height commandBuffer graphicsPipeline = do Vk.cmdBindPipeline commandBuffer Vk.PIPELINE_BIND_POINT_GRAPHICS graphicsPipeline let viewport = Vk.zero