github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-03 13:02:37 +03:00
Code Issues Projects Releases Wiki Activity

Add a word-or-separator predicate.

Browse Source
This commit is contained in:
Rob Rix 2015-12-14 16:19:21 -05:00
parent a135c24967
commit 9af8783d1e
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/Range.hs
View File

@ -26,6 +26,7 @@ rangesAndWordsFrom startIndex string = case break (not . isWord) string of
word string = parse isWord word string = parse isWord
punctuation = parse $ \ c -> not (isWord c || Char.isSpace c) punctuation = parse $ \ c -> not (isWord c || Char.isSpace c)
space string = parse Char.isSeparator space string = parse Char.isSeparator
isWordOrSeparator c = Char.isSeparator c || isWord c
-- | Is this a word character? -- | Is this a word character?
-- | Word characters are defined as in [Ruby’s `\p{Word}` syntax](http://ruby-doc.org/core-2.1.1/Regexp.html#class-Regexp-label-Character+Properties), i.e.: -- | Word characters are defined as in [Ruby’s `\p{Word}` syntax](http://ruby-doc.org/core-2.1.1/Regexp.html#class-Regexp-label-Character+Properties), i.e.:
-- | > A member of one of the following Unicode general category _Letter_, _Mark_, _Number_, _Connector_Punctuation_ -- | > A member of one of the following Unicode general category _Letter_, _Mark_, _Number_, _Connector_Punctuation_