my $value = eval("0x$1");
if ($value > 0xffff) {
print STDERR "Error: We've assumed decomposition codes are max. 16bit\n";
- exit;
+ exit 1;
}
if ($code <= 0xffff) {
push @uni16_decomp_keys, $code;
# multicharacter decomposition.
if ($code > 0xffffffff) {
print STDERR "Error: We've assumed multi-decomposition key codes are max. 32bit\n";
- exit;
+ exit 1;
}
push @multidecomp_keys, $code;
my $value = eval("0x$dcode");
if ($value > 0xffff) {
print STDERR "Error: We've assumed decomposition codes are max. 16bit\n";
- exit;
+ exit 1;
}
push @multidecomp_values, $value;
}