2016-06-30 23:41:56 +00:00
|
|
|
# © 2016 and later: Unicode, Inc. and others.
|
|
|
|
# License & terms of use: http://www.unicode.org/copyright.html#License
|
2016-09-19 05:09:40 +00:00
|
|
|
#
|
2006-07-21 01:08:32 +00:00
|
|
|
# File: Thai_ThaiLogical.txt
|
2016-09-19 05:09:40 +00:00
|
|
|
# Generated from CLDR
|
2006-07-21 01:08:32 +00:00
|
|
|
#
|
2016-02-05 03:37:50 +00:00
|
|
|
|
|
|
|
# This reverses the Thai LogicalOrderException vowels, and does (part of) spaces
|
|
|
|
# The rules that convert space into semicolon are in another file;
|
|
|
|
# since they have to come BEFORE the break iterator
|
2006-07-21 01:08:32 +00:00
|
|
|
$thai = [[:thai:] ก-\u0E3Aเ-๛] ;
|
2016-02-05 03:37:50 +00:00
|
|
|
# First convert the semicolon back
|
2012-08-28 21:56:06 +00:00
|
|
|
' ' ← $thai { '; ' } $thai;
|
2016-02-05 03:37:50 +00:00
|
|
|
# Remove any other spaces between thai letters
|
2009-04-10 07:47:09 +00:00
|
|
|
← $thai { ' ' } $thai;
|
2016-02-05 03:37:50 +00:00
|
|
|
# Now vowels
|
2004-08-02 20:06:55 +00:00
|
|
|
$thai_reversing = [[:Logical_Order_Exception:] & $thai];
|
|
|
|
$thai_non_reversing = [$thai - $thai_reversing ];
|
2009-04-10 07:47:09 +00:00
|
|
|
( $thai_reversing ) ( $thai_non_reversing ) → $2 $1;
|
2016-02-05 03:37:50 +00:00
|
|
|
# other direction
|
2009-04-10 07:47:09 +00:00
|
|
|
$2 $1 ← ( $thai_non_reversing ) ( $thai_reversing ) ;
|
2016-02-05 03:37:50 +00:00
|
|
|
|