diff options
Diffstat (limited to 'compiler/utils/Encoding.hs')
| -rw-r--r-- | compiler/utils/Encoding.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/utils/Encoding.hs b/compiler/utils/Encoding.hs index c7f90706f9..5afe870934 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 |