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 incp1257.otp
% Conversion to Unicode from Windows Baltic codepage (CP1257)
% 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:
tabcp1257[@"80] = {
@"20AC, @"FFFD, @"201A, @"FFFD, @"201E, @"2026, @"2020, @"2021,
@"FFFD, @"2030, @"FFFD, @"2039, @"FFFD, @"00A8, @"02C7, @"00B8,
@"FFFD, @"2018, @"2019, @"201C, @"201D, @"2022, @"2013, @"2014,
@"FFFD, @"2122, @"FFFD, @"203A, @"FFFD, @"00AF, @"02DB, @"FFFD,
@"00A0, @"FFFD, @"00A2, @"00A3, @"00A4, @"FFFD, @"00A6, @"00A7,
@"00D8, @"00A9, @"0156, @"00AB, @"00AC, @"00AD, @"00AE, @"00C6,
@"00B0, @"00B1, @"00B2, @"00B3, @"00B4, @"00B5, @"00B6, @"00B7,
@"00F8, @"00B9, @"0157, @"00BB, @"00BC, @"00BD, @"00BE, @"00E6,
@"0104, @"012E, @"0100, @"0106, @"00C4, @"00C5, @"0118, @"0112,
@"010C, @"00C9, @"0179, @"0116, @"0122, @"0136, @"012A, @"013B,
@"0160, @"0143, @"0145, @"00D3, @"014C, @"00D5, @"00D6, @"00D7,
@"0172, @"0141, @"015A, @"016A, @"00DC, @"017B, @"017D, @"00DF,
@"0105, @"012F, @"0101, @"0107, @"00E4, @"00E5, @"0119, @"0113,
@"010D, @"00E9, @"017A, @"0117, @"0123, @"0137, @"012B, @"013C,
@"0161, @"0144, @"0146, @"00F3, @"014D, @"00F5, @"00F6, @"00F7,
@"0173, @"0142, @"015B, @"016B, @"00FC, @"017C, @"017E, @"02D9
};
expressions:
@"00-@"7F => \1;
@"80-@"FF => #(tabcp1257[\1-@"80]);
. => @"FFFD;
|
