From 3e1f789ed52e20f1ddf6e20ed9c7f61cf7aaedbd Mon Sep 17 00:00:00 2001
From: Csaba Hruska <csaba.hruska@gmail.com>
Date: Sat, 22 Sep 2018 12:44:47 +0200
Subject: fix stack and compatibility issues

---
 examples/pickInt.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'examples')

diff --git a/examples/pickInt.hs b/examples/pickInt.hs
index 2703e91..335364a 100644
--- a/examples/pickInt.hs
+++ b/examples/pickInt.hs
@@ -79,7 +79,7 @@ main = do
                   [LC.GLOutputRenderTexture (fromIntegral -> fbo) _rendTex] -> do
                     rtexPicks <- collectPicks fbo pickPoints
                     printPicks pickPoints rtexPicks
-                  x -> error $ "Unexpected outputs: " <> show x
+                  x -> error $ "Unexpected outputs: " ++ show x
 
                 -- render to framebuffer & pick
                 LambdaCubeGL.renderFrame pipeDraw
-- 
cgit v1.2.3