make gegl dependency

This commit is contained in:
nek0 2016-04-26 22:33:35 +02:00
parent 0faa4c6c29
commit 1262be0666
3 changed files with 5 additions and 1 deletions

View file

@ -47,6 +47,7 @@ library
, text
, linear
, mtl
, gegl
-- , sdl2-image
source-repository head

View file

@ -9,7 +9,7 @@ module Affection
import SDL
import Data.Text
import qualified Control.Concurrent as CC
import GEGL
import Affection.Render
import Affection.Types
@ -24,7 +24,9 @@ withWindow :: Monad m => Text -> WindowConfig -> RendererConfig -> RenderT m a -
withWindow title wconf rconf ops = do
window <- createWindow title wconf
renderer <- createRenderer window (-1) rconf
gegl_init
inRender renderer $ ops
gegl_exit
destroyWindow window
withDefaultWindow :: Monad m => Text -> (RenderT m a) -> IO ()

View file

@ -6,6 +6,7 @@ resolver: lts-5.1
# Local packages, usually specified by relative directory name
packages:
- '.'
- "../gegl"
# Packages to be pulled from upstream that are not in the resolver (e.g., acme-missiles-0.3)
extra-deps: []