blob: 30c1c40d45b1d602cfd669702eb6990c5fbed42d [file] [log] [blame]
# Copyright (c) 2002-2014, International Business Machines Corporation and
# others. All Rights Reserved.
#
# Title Casing Break Rules
#
$CaseIgnorable = [[:Mn:][:Me:][:Cf:][:Lm:][:Sk:] \u0027 \u00AD \u2019];
$Cased = [[:Upper_Case:][:Lower_Case:][:Lt:] - $CaseIgnorable];
$NotCased = [[^ $Cased] - $CaseIgnorable];
!!forward;
# If the iterator begins on a CaseIgnorable, advance it past it/them.
# This can occur at the start-of-text, or after application of the
# safe-reverse rule.
($CaseIgnorable | $NotCased)*;
# Normal exact forward rule: beginning at the start of a word
# (at a cased character), advance through the word and through
# the uncased characters following the word.
$Cased ($Cased | $CaseIgnorable)* ($NotCased | $CaseIgnorable)*;
# Reverse Rules
!!reverse;
# Normal Rule, will work nearly universally, so long as there is a
# start-of-word preceding the current iteration position.
($NotCased | $CaseIgnorable)* ($Cased | $CaseIgnorable)* $Cased;
# Short rule, will be effective only when moving to the start of text,
# with no word (cased character) preceding the current iteration position.
($NotCased | $CaseIgnorable)*;
!!safe_reverse;
# Safe Reverse: the exact forward rule must not start in the middle
# of a word, so the safe reverse skips over any Cased characters,
# leaving it just before the start of a word.
($Cased | $CaseIgnorable)*;
!!safe_forward;
# Safe Forward, nothing needs to be done, the exact Reverse rules will
# always find valid boundaries from any starting position.
# Still, some rule is needed, so '.', a one character movement.
.;