1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
<?xml version="1.0" encoding="UTF-8" ?>
<!DOCTYPE supplementalData SYSTEM "../../common/dtd/ldmlSupplemental.dtd">
<!--
Copyright © 1991-2013 Unicode, Inc.
CLDR data files are interpreted according to the LDML specification (http://unicode.org/reports/tr35/)
For terms of use, see http://www.unicode.org/copyright.html
-->
<supplementalData>
<version number="$Revision: 8242 $"/>
<generation date="$Date: 2013-02-24 21:06:02 -0600 (Sun, 24 Feb 2013) $"/>
<transforms>
<transform source="Thai" target="ThaiLogical" direction="both" visibility="internal">
<comment># This reverses the Thai LogicalOrderException vowels, and does (part of) spaces</comment>
<comment># The rules that convert space into semicolon are in another file;</comment>
<comment># since they have to come BEFORE the break iterator</comment>
<tRule>$thai = [[:thai:] ก-ฺเ-๛] ;</tRule>
<comment># First convert the semicolon back</comment>
<tRule>' ' ← $thai { '; ' } $thai;</tRule>
<comment># Remove any other spaces between thai letters</comment>
<tRule>← $thai { ' ' } $thai;</tRule>
<comment># Now vowels</comment>
<tRule>$thai_reversing = [[:Logical_Order_Exception:] & $thai];</tRule>
<tRule>$thai_non_reversing = [$thai - $thai_reversing ];</tRule>
<tRule>( $thai_reversing ) ( $thai_non_reversing ) → $2 $1;</tRule>
<comment># other direction</comment>
<tRule>$2 $1 ← ( $thai_non_reversing ) ( $thai_reversing ) ;</tRule>
</transform>
</transforms>
</supplementalData>
|
