[kaya] Fix issue in CodegenCPP.hs

[Jochen Schmitt]

commit c1118313fbd2be453b6d05424323e9f51e8217a8
Author: Jochen Schmitt <Jochen at herr-schmitt.de>
Date:   Tue Aug 27 21:48:56 2013 +0200

    Fix issue in CodegenCPP.hs

 kaya-0.5.2-ghc76.patch |   21 +++++++++++++++++++++
 1 files changed, 21 insertions(+), 0 deletions(-)
---
diff --git a/kaya-0.5.2-ghc76.patch b/kaya-0.5.2-ghc76.patch
index 33fe890..f2c7615 100644
--- a/kaya-0.5.2-ghc76.patch
+++ b/kaya-0.5.2-ghc76.patch
@@ -1,3 +1,24 @@
+diff -up kaya-0.5.2/compiler/CodegenCPP.hs.ghc76 kaya-0.5.2/compiler/CodegenCPP.hs
+--- kaya-0.5.2/compiler/CodegenCPP.hs.ghc76	2013-08-27 21:47:07.488306019 +0200
++++ kaya-0.5.2/compiler/CodegenCPP.hs	2013-08-27 21:48:17.920648399 +0200
+@@ -17,6 +17,8 @@ import Debug.Trace
+ import Lib
+ import Data.List
+ 
++import Control.Exception
++
+ data Output = RawOutput String
+ 	    | FNOutput (Name, Type, String, [(ArgType, Var)], String)
+ 	    | ExternOutput (Name, Type)
+@@ -151,7 +153,7 @@ findFile (x:xs) path
+          (do --putStrLn $ "Trying " ++ x ++ path
+ 	     f <- readFile (x++path)
+ 	     return f)
+-         (\e -> findFile xs path)
++         (\ (e :: SomeException) -> findFile xs path)
+ 
+ writecpp :: [CompileResult] -> [Output]
+ writecpp [] = []
 diff -up kaya-0.5.2/compiler/Module.hs.ghc76 kaya-0.5.2/compiler/Module.hs
 --- kaya-0.5.2/compiler/Module.hs.ghc76	2013-08-27 21:33:00.658326051 +0200
 +++ kaya-0.5.2/compiler/Module.hs	2013-08-27 21:33:00.689323999 +0200