diff --git a/app/Classes/Renderable.hs b/app/Classes/Renderable.hs index e6ee6e0..be77aad 100644 --- a/app/Classes/Renderable.hs +++ b/app/Classes/Renderable.hs @@ -1,4 +1,5 @@ {-# LANGUAGE TypeFamilies #-} +{-# LANGUAGE AllowAmbiguousTypes #-} module Classes.Renderable where class Renderable a where diff --git a/app/Renderer.hs b/app/Renderer.hs index 005f883..8d4d358 100644 --- a/app/Renderer.hs +++ b/app/Renderer.hs @@ -6,7 +6,7 @@ import qualified Graphics.Rendering.OpenGL as GL import Foreign -initRenderData = do +initSpriteRenderData = do quadVAO <- GL.genObjectName quadVBO <- GL.genObjectName diff --git a/canvas.cabal b/canvas.cabal index d497213..12b8541 100644 --- a/canvas.cabal +++ b/canvas.cabal @@ -21,6 +21,7 @@ executable canvas main-is: Main.hs other-modules: Types Types.UserData + Classes.Renderable Renderer -- other-extensions: build-depends: base ^>=4.12.0.0