on cd7869d help sign in
65 lines 1.4 kB history raw
1-- |
2-- Module : Streamly.Data.Internal.Unicode.Char
3-- Copyright : (c) 2018 Composewell Technologies
4--
5-- License : BSD3
6-- Maintainer : streamly@composewell.com
7-- Stability : experimental
8-- Portability : GHC
9--
10module Streamly.Internal.Data.Unicode.Char
11 (
12 -- * Predicates
13 isAsciiAlpha
15 -- * Unicode aware operations
16 {-
17 toCaseFold
18 , toLower
19 , toUpper
20 , toTitle
21 -}
22 )
23where
25import Data.Char (isAsciiUpper, isAsciiLower)
27-- import Streamly (IsStream)
29-------------------------------------------------------------------------------
30-- Unicode aware operations on strings
31-------------------------------------------------------------------------------
33-- | Select alphabetic characters in the ascii character set.
34--
35-- /Internal/
36--
37{-# INLINE isAsciiAlpha #-}
38isAsciiAlpha :: Char -> Bool
39isAsciiAlpha c = isAsciiUpper c || isAsciiLower c
41-------------------------------------------------------------------------------
42-- Unicode aware operations on strings
43-------------------------------------------------------------------------------
45{-
46-- |
47-- /undefined/
48toCaseFold :: IsStream t => Char -> t m Char
49toCaseFold = undefined
51-- |
52-- /undefined/
53toLower :: IsStream t => Char -> t m Char
54toLower = undefined
56-- |
57-- /undefined/
58toUpper :: IsStream t => Char -> t m Char
59toUpper = undefined
61-- |
62-- /undefined/
63toTitle :: IsStream t => Char -> t m Char
64toTitle = undefined
65-}