From 159689198a04d62643028ebd9a49ccb91552337e Mon Sep 17 00:00:00 2001
From: "simonmar@microsoft.com" <unknown>
Date: Thu, 1 Jun 2006 11:53:35 +0000
Subject: [PATCH] add a type signature

---
 compiler/utils/Encoding.hs |    1 +
 1 file changed, 1 insertion(+)

diff --git a/compiler/utils/Encoding.hs b/compiler/utils/Encoding.hs
index c7f9070..5afe870 100644
--- a/compiler/utils/Encoding.hs
+++ b/compiler/utils/Encoding.hs
@@ -138,6 +138,7 @@ countUTF8Chars ptr bytes = go ptr 0
 
 unPtr (Ptr a) = a
 
+utf8EncodeChar :: Char -> Ptr Word8 -> IO (Ptr Word8)
 utf8EncodeChar c ptr =
   let x = ord c in
   case () of
-- 
1.7.10.4