Commit 016eeb51 authored by Nikolay Sivov's avatar Nikolay Sivov Committed by Alexandre Julliard

gdi32/uniscribe: Get rid of shaping group values in Arabic shaping data table.

It's not used right now, Syriac specific groups will be accomodated as additional joining types. Signed-off-by: 's avatarNikolay Sivov <nsivov@codeweavers.com> Signed-off-by: 's avatarAlexandre Julliard <julliard@winehq.org>
parent f734d98a
...@@ -1603,10 +1603,6 @@ sub dump_bracket($) ...@@ -1603,10 +1603,6 @@ sub dump_bracket($)
sub dump_shaping($) sub dump_shaping($)
{ {
my $filename = shift; my $filename = shift;
my %groups;
my $next_group = 0;
$groups{"No_Joining_Group"} = $next_group++;
my $INPUT = open_data_file( $UNIDATA, "ArabicShaping.txt" ); my $INPUT = open_data_file( $UNIDATA, "ArabicShaping.txt" );
while (<$INPUT>) while (<$INPUT>)
...@@ -1617,9 +1613,7 @@ sub dump_shaping($) ...@@ -1617,9 +1613,7 @@ sub dump_shaping($)
if (/^\s*([0-9a-fA-F]+)\s*;.*;\s*([RLDCUT])\s*;\s*(\w+)/) if (/^\s*([0-9a-fA-F]+)\s*;.*;\s*([RLDCUT])\s*;\s*(\w+)/)
{ {
my $type = $2; my $type = $2;
my $group = $3; $joining_table[hex $1] = $joining_types{$type};
$groups{$group} = $next_group++ unless defined $groups{$group};
$joining_table[hex $1] = $joining_types{$type} | ($groups{$group} << 8);
next; next;
} }
die "malformed line $_"; die "malformed line $_";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment