Skip to content

Commit aa272e7

Browse files
committed
Rename a isAlpha and isSecondStarter
isAlpha -> isLetter isSecondStarter -> isCombiningStarter
1 parent f5b1bc4 commit aa272e7

File tree

2 files changed

+9
-9
lines changed

2 files changed

+9
-9
lines changed

lib/Unicode/Char/General.hs

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -6,7 +6,7 @@
66
-- Stability : experimental
77
--
88
module Unicode.Char.General
9-
( isAlpha
9+
( isLetter
1010
, isSpace
1111

1212
-- Hangul
@@ -45,11 +45,11 @@ import qualified Unicode.Internal.Char.PropList as P
4545
-- and title-case letters, plus letters of caseless scripts and modifiers
4646
-- letters).
4747
--
48-
-- prop> isAlpha == Data.Char.isAlpha
48+
-- prop> isLetter == Data.Char.isLetter
4949
--
50-
{-# INLINE isAlpha #-}
51-
isAlpha :: Char -> Bool
52-
isAlpha = P.isAlphabetic
50+
{-# INLINE isLetter #-}
51+
isLetter :: Char -> Bool
52+
isLetter = P.isAlphabetic
5353

5454
-- | Returns 'True' for any whitespace characters, and the control
5555
-- characters @\\t@, @\\n@, @\\r@, @\\f@, @\\v@.

lib/Unicode/Char/Normalization.hs

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,7 @@ module Unicode.Char.Normalization
99
(
1010
-- Compose
1111
compose
12-
, isSecondStarter
12+
, isCombiningStarter
1313
, composeStarters
1414

1515
-- Decompose
@@ -57,9 +57,9 @@ composeStarters = C.composeStarters
5757

5858
-- | Return 'True' if a starter character may combine with some preceding
5959
-- starter character.
60-
{-# INLINE isSecondStarter #-}
61-
isSecondStarter :: Char -> Bool
62-
isSecondStarter = C.isSecondStarter
60+
{-# INLINE isCombiningStarter #-}
61+
isCombiningStarter :: Char -> Bool
62+
isCombiningStarter = C.isSecondStarter
6363

6464
-------------------------------------------------------------------------------
6565
-- Decompose

0 commit comments

Comments
 (0)