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