From ca420960992d395f8b44351a72b0ed0efd006d8c Mon Sep 17 00:00:00 2001 From: nek0 Date: Sun, 22 Oct 2023 06:22:23 +0200 Subject: [PATCH] let's try upping the numbers --- src/CommandBuffer.hs | 2 +- src/Init.hs | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/CommandBuffer.hs b/src/CommandBuffer.hs index 17b7234..fd72d13 100644 --- a/src/CommandBuffer.hs +++ b/src/CommandBuffer.hs @@ -28,7 +28,7 @@ frameOverlap :: Int frameOverlap = 2 maxObjects :: Int -maxObjects = 10000 +maxObjects = 10 ^ 6 createFrames :: (MonadResource m, MonadFail m) diff --git a/src/Init.hs b/src/Init.hs index 497bbbc..8be1fa8 100644 --- a/src/Init.hs +++ b/src/Init.hs @@ -218,9 +218,9 @@ initScene device descriptorPool texturedSetLayout = do , objectMatrix = translationMatrix !*! scaleMatrix } ) - (V.fromList [-20 .. 20]) + (V.fromList [-100 .. 100]) ) - (V.fromList [-20 .. 20]) + (V.fromList [-100 .. 100]) renderableContainer <- asks renderables renderableVector <- liftIO $ STM.atomically $ STM.readTMVar renderableContainer