aboutsummaryrefslogtreecommitdiff
path: root/src/Chelleport/Context.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Chelleport/Context.hs')
-rw-r--r--src/Chelleport/Context.hs12
1 files changed, 4 insertions, 8 deletions
diff --git a/src/Chelleport/Context.hs b/src/Chelleport/Context.hs
index 3c2c850..b721812 100644
--- a/src/Chelleport/Context.hs
+++ b/src/Chelleport/Context.hs
@@ -1,22 +1,18 @@
module Chelleport.Context (initializeContext) where
+-- import Data.Time.Clock.System
+-- import qualified Debug.Trace as Debug
+
+import Chelleport.Config
import Chelleport.Types
import Data.ByteString (ByteString)
import Data.FileEmbed (embedFileRelative)
--- import Data.Time.Clock.System
--- import qualified Debug.Trace as Debug
import Foreign.C (CFloat)
import qualified Graphics.X11 as X11
import SDL (($=))
import qualified SDL
import qualified SDL.Font as TTF
-windowOpacity :: CFloat
-windowOpacity = 0.5
-
-fontSize :: Int
-fontSize = 24
-
-- benchmark :: String -> IO a -> IO a
-- benchmark msg m = do
-- start <- systemNanoseconds <$> getSystemTime