blob: 0c515e745463da4dbe3e4ad0ddcd04dad38a84fe [file] [log] [blame]
#--------------------------------------------------------------------
# Copyright (c) 1999-2001, International Business Machines
# Corporation and others. All Rights Reserved.
#--------------------------------------------------------------------
# $Source: /xsrl/Nsvn/icu/icu4j/src/com/ibm/icu/impl/data/Attic/Transliterator_Thai_ThaiLogical.txt,v $
# $Date: 2002/07/13 03:36:59 $
# $Revision: 1.2 $
#--------------------------------------------------------------------
# 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
# First convert the semicolon back
' ' < [:thai:] [:mark:]* { '; ' } [:thai:];
# Remove any other spaces between thai letters
< [:thai:] [:mark:]* { ' ' } [:thai:];
# Now vowels
$thai_reversing = [[:Logical_Order_Exception:] & [:thai:]];
$thai_non_reversing = [[:thai:] - $thai_reversing ];
( $thai_reversing ) ( $thai_non_reversing ) > $2 $1;
# other direction
$2 $1 < ( $thai_non_reversing ) ( $thai_reversing ) ;