From 4feac51f26c7aa49920a44bf287e4d73829995cc Mon Sep 17 00:00:00 2001 From: nek0 Date: Sun, 22 Oct 2023 07:14:22 +0200 Subject: [PATCH] weed out stuff --- src/CommandBuffer.hs | 45 -------------------------------------------- 1 file changed, 45 deletions(-) diff --git a/src/CommandBuffer.hs b/src/CommandBuffer.hs index 868a3b5..70971e0 100644 --- a/src/CommandBuffer.hs +++ b/src/CommandBuffer.hs @@ -1,4 +1,3 @@ -{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE FlexibleContexts #-} @@ -320,50 +319,6 @@ recordCommandBuffer ) draws - -- V.mapM_ - -- (\(IndirectBatch mesh material first count) -> do - - -- when - -- (materialTextureSet material /= Vk.NULL_HANDLE) - -- (Vk.cmdBindDescriptorSets - -- commandBuffer - -- Vk.PIPELINE_BIND_POINT_GRAPHICS - -- (materialPipelineLayout material) - -- 2 - -- (V.singleton $ materialTextureSet material) - -- V.empty - -- ) - - -- Vk.cmdBindPipeline commandBuffer Vk.PIPELINE_BIND_POINT_GRAPHICS (materialPipeline material) - - -- Vk.cmdBindDescriptorSets - -- commandBuffer - -- Vk.PIPELINE_BIND_POINT_GRAPHICS - -- (materialPipelineLayout material) - -- 0 - -- (V.singleton $ frameGlobalDescriptor frame) - -- V.empty - - -- Vk.cmdBindDescriptorSets - -- commandBuffer - -- Vk.PIPELINE_BIND_POINT_GRAPHICS - -- (materialPipelineLayout material) - -- 1 - -- (V.singleton $ frameObjectDescriptor frame) - -- V.empty - - -- Vk.cmdBindVertexBuffers - -- commandBuffer - -- 0 - -- (V.fromList [ allocatedBuffer $ meshBuffer mesh ]) - -- (V.fromList [ 0 ]) - - -- mapM_ - -- (Vk.cmdDraw commandBuffer (fromIntegral $ V.length $ meshVertices mesh) 1 0) - -- [first .. (count - 1)] - -- ) - -- draws - prepareRecording :: V2 CInt -> Vk.CommandBuffer