From 2c025b3b32a255d32c521e917f7a3583971a2e63 Mon Sep 17 00:00:00 2001 From: andromeda Date: Wed, 19 Aug 2026 18:12:33 +0200 Subject: remove needless dep --- Main.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Main.hs') diff --git a/Main.hs b/Main.hs index a314bdb..f47be49 100644 --- a/Main.hs +++ b/Main.hs @@ -47,9 +47,9 @@ layers = V.fromList $ map BSC.pack ["VK_LAYER_KHRONOS_validation"] extensions :: Vector ByteString extensions = V.fromList $ map BSC.pack ["VK_KHR_swapchain"] -frag = $( do +frag = $(do fragPath <- runIO $ makeAbsolute "assets/shaders/frag.spv" - runCompilationsTH [("Fragment Shader", compileTo fragPath [] Shaders.fragment)]) + runCompilationsTH [("Fragment Shader", compileTo fragPath [] Shaders.fragment)] ) main :: IO () main = withRGFW "rgfw instance title" (fromIntegral $ RGFW.unwrapRGFW_initFlags_enum RGFW.RGFW_initVulkan) $ \_ -> do -- cgit v1.3.1