title.txt revision ac04d0bbe12b3ef54518635711412f178cb4d16 
1# Copyright (c) 2002-2003, International Business Machines Corporation and
2# others. All Rights Reserved.
3#
4#  Title Casing Break Rules
5#
6
7$CaseIgnorable   = [[:Mn:][:Me:][:Cf:][:Lm:][:Sk:] \u0027 \u00AD \u2019];
8$Cased           = [[:Upper_Case:][:Lower_Case:][:Lt:]  - $CaseIgnorable];
9$NotCased        = [^ $Cased];
10
11#
12#  If the iterator was not stopped on a cased character, advance it to the first cased char
13#
14$NotCased+;
15
16#
17#  If the iterator starts on a cased item, advance through all adjacent cased items plus
18#    any non-cased stuff, to reach the start of the next word.
19#
20$Cased ($Cased | $CaseIgnorable)* $NotCased*;
21
22#
23#  Reverse Rules
24#
25
26! $NotCased+;
27
28#
29#  If the iterator starts on a cased item, advance through all adjacent cased items plus
30#    any non-cased stuff, to reach the start of the next word.
31#
32! $NotCased* ($Cased | $CaseIgnorable)* $Cased;