From 87815edbab70302793fb83259fedc1ae9004d172 Mon Sep 17 00:00:00 2001 From: Akshay Nair Date: Sat, 21 Dec 2024 16:37:24 +0530 Subject: Optimize initialization time --- src/Chelleport/AppShell.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'src/Chelleport/AppShell.hs') diff --git a/src/Chelleport/AppShell.hs b/src/Chelleport/AppShell.hs index 382f61e..8f8a19d 100644 --- a/src/Chelleport/AppShell.hs +++ b/src/Chelleport/AppShell.hs @@ -24,6 +24,7 @@ instance (MonadIO m) => MonadAppShell (AppM m) where SDL.destroyRenderer $ ctxRenderer ctx SDL.destroyWindow $ ctxWindow ctx releaseMouseButton + SDL.quit liftIO $ do X11.closeDisplay $ ctxX11Display ctx exitSuccess -- cgit v1.3.1