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
31
32
33
34
35
36
37
38
39
|
% File incp874.otp
% Conversion to Unicode from Windows Thai codepage (CP874)
% Copyright (c) 2002 Roozbeh Pournader
% This file is part of the Omega project.
%
% This file was derived from information available from
% Microsoft's website about codepages
% (http://www.microsoft.com/globaldev/)
%
input: 1;
output: 2;
tables:
tabcp874[@"80] = {
@"20AC, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"2026, @"FFFD, @"FFFD,
@"FFFD, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"FFFD,
@"FFFD, @"2018, @"2019, @"201C, @"201D, @"2022, @"2013, @"2014,
@"FFFD, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"FFFD,
@"00A0, @"0E01, @"0E02, @"0E03, @"0E04, @"0E05, @"0E06, @"0E07,
@"0E08, @"0E09, @"0E0A, @"0E0B, @"0E0C, @"0E0D, @"0E0E, @"0E0F,
@"0E10, @"0E11, @"0E12, @"0E13, @"0E14, @"0E15, @"0E16, @"0E17,
@"0E18, @"0E19, @"0E1A, @"0E1B, @"0E1C, @"0E1D, @"0E1E, @"0E1F,
@"0E20, @"0E21, @"0E22, @"0E23, @"0E24, @"0E25, @"0E26, @"0E27,
@"0E28, @"0E29, @"0E2A, @"0E2B, @"0E2C, @"0E2D, @"0E2E, @"0E2F,
@"0E30, @"0E31, @"0E32, @"0E33, @"0E34, @"0E35, @"0E36, @"0E37,
@"0E38, @"0E39, @"0E3A, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"0E3F,
@"0E40, @"0E41, @"0E42, @"0E43, @"0E44, @"0E45, @"0E46, @"0E47,
@"0E48, @"0E49, @"0E4A, @"0E4B, @"0E4C, @"0E4D, @"0E4E, @"0E4F,
@"0E50, @"0E51, @"0E52, @"0E53, @"0E54, @"0E55, @"0E56, @"0E57,
@"0E58, @"0E59, @"0E5A, @"0E5B, @"FFFD, @"FFFD, @"FFFD, @"FFFD
};
expressions:
@"00-@"7F => \1;
@"80-@"FF => #(tabcp874[\1-@"80]);
. => @"FFFD;
|