summaryrefslogtreecommitdiff
path: root/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Main.hs')
-rw-r--r--Main.hs4
1 files changed, 2 insertions, 2 deletions
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