summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/omega/otp/char2uni/incp1251.otp
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-11 22:58:20 +0000
committerKarl Berry <karl@freefriends.org>2006-01-11 22:58:20 +0000
commitd087712418726a64822e40ce1c0627a514d17975 (patch)
treec4942175bbffb74d67fe94f7ab804354bed7824f /Master/texmf-dist/omega/otp/char2uni/incp1251.otp
parente6a66b49ce19e32e4719208298db515429c3c12f (diff)
trunk/Master/texmf-dist/omega
git-svn-id: svn://tug.org/texlive/trunk@103 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/omega/otp/char2uni/incp1251.otp')
-rw-r--r--Master/texmf-dist/omega/otp/char2uni/incp1251.otp34
1 files changed, 34 insertions, 0 deletions
diff --git a/Master/texmf-dist/omega/otp/char2uni/incp1251.otp b/Master/texmf-dist/omega/otp/char2uni/incp1251.otp
new file mode 100644
index 00000000000..a2193df6b5f
--- /dev/null
+++ b/Master/texmf-dist/omega/otp/char2uni/incp1251.otp
@@ -0,0 +1,34 @@
+% File incp1251.otp
+% Conversion to Unicode from Cyrillic MS-DOS encoding (CP 1251)
+% Copyright (c) 1995 John Plaice and Yannis Haralambous
+% Copyright (c) 2002 Roozbeh Pournader
+% This file is part of the Omega project.
+%
+% This file was derived from data in the tcs program
+% (ftp://plan9.att.com/plan9/unixsrc/tcs.shar.Z, 16 November 1994)
+% and then modified based on data from glibc data files
+% (http://www.gnu.org/software/libc/libc.html)
+%
+
+input: 1;
+output: 2;
+
+tables:
+
+tabcp1251[@"40] = {
+@"0402, @"0403, @"201A, @"0453, @"201E, @"2026, @"2020, @"2021,
+@"20AC, @"2030, @"0409, @"2039, @"040A, @"040C, @"040B, @"040F,
+@"0452, @"2018, @"2019, @"201C, @"201D, @"2022, @"2013, @"2014,
+@"FFFD, @"2122, @"0459, @"203A, @"045A, @"045C, @"045B, @"045F,
+@"00A0, @"040E, @"045E, @"0408, @"00A4, @"0490, @"00A6, @"00A7,
+@"0401, @"00A9, @"0404, @"00AB, @"00AC, @"00AD, @"00AE, @"0407,
+@"00B0, @"00B1, @"0406, @"0456, @"0491, @"00B5, @"00B6, @"00B7,
+@"0451, @"2116, @"0454, @"00BB, @"0458, @"0405, @"0455, @"0457
+};
+
+expressions:
+
+@"00-@"7F => \1;
+@"C0-@"FF => #(\1 + @"350);
+@"80-@"BF => #(tabcp1251[\1-@"80]);
+. => @"FFFD;