summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlgs/lib/winmaps.ps
diff options
context:
space:
mode:
authorReinhard Kotucha <reinhard.kotucha@web.de>2010-05-12 19:25:45 +0000
committerReinhard Kotucha <reinhard.kotucha@web.de>2010-05-12 19:25:45 +0000
commitdc55d4f5cde421a3704c183bc6ceb3fcdb6b0653 (patch)
treedb0890c2f5f2714d527a42ad3fb7955ac5b1f545 /Master/tlpkg/tlgs/lib/winmaps.ps
parent053ead4487e776b05721ec15b941fe0bc1b7d513 (diff)
tlgs: 8.70 => 8.71
git-svn-id: svn://tug.org/texlive/trunk@18215 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlgs/lib/winmaps.ps')
-rw-r--r--[-rwxr-xr-x]Master/tlpkg/tlgs/lib/winmaps.ps212
1 files changed, 106 insertions, 106 deletions
diff --git a/Master/tlpkg/tlgs/lib/winmaps.ps b/Master/tlpkg/tlgs/lib/winmaps.ps
index a386f5a4647..a42ba6a89f0 100755..100644
--- a/Master/tlpkg/tlgs/lib/winmaps.ps
+++ b/Master/tlpkg/tlgs/lib/winmaps.ps
@@ -1,106 +1,106 @@
-% Copyright (C) 1993 Aladdin Enterprises. All rights reserved.
-%
-% This software is provided AS-IS with no warranty, either express or
-% implied.
-%
-% This software is distributed under license and may not be copied,
-% modified or distributed except as expressly authorized under the terms
-% of the license contained in the file LICENSE in this distribution.
-%
-% For more information about licensing, please refer to
-% http://www.ghostscript.com/licensing/. For information on
-% commercial licensing, go to http://www.artifex.com/licensing/ or
-% contact Artifex Software, Inc., 101 Lucas Valley Road #110,
-% San Rafael, CA 94903, U.S.A., +1(415)492-9861.
-
-% $Id: winmaps.ps 6855 2006-06-14 21:03:34Z giles $
-% winmaps.ps - make maps between PostScript encodings and Windows
-% character sets.
-
-% Define the two Windows encodings.
-
-/ANSIEncoding
- ISOLatin1Encoding 256 array copy
- dup 16#90 /.notdef put
- 16#93 1 16#9f { 2 copy /.notdef put pop } for
-def
-
-/OEMEncoding [
- /.notdef /.notdef /.notdef /heart /diamond /club /spade /bullet
- 8 { /.notdef } repeat
- /.notdef /.notdef /.notdef /.notdef /paragraph /section /.notdef /.notdef
- /arrowup /arrowdown /arrowright /arrowleft /.notdef /arrowboth /.notdef /.notdef
- StandardEncoding 32 96 getinterval aload pop
- /Ccedilla /udieresis /eacute /acircumflex /adieresis /agrave /aring /ccedilla
- /ecircumflex /edieresis /egrave /idieresis /igrave /Adieresis /Aring
- /Eacute /ae /AE /ocircumflex /odieresis /ograve /ucircumflex /ugrave
- /ydieresis /Odieresis /Udieresis /cent /sterling /yen /.notdef /florin
- /aacute /iacute /oacute /uacute /ntilde /Ntilde /ordfeminine /ordmasculine
- /questiondown /.notdef /logicalnot /onehalf /onequarter /exclamdown /guillemotleft /guillemotright
- 48 { /.notdef } repeat
- /alpha /beta /Gamma /Pi /Sigma /sigma /mu /tau
- /Phi /Theta /Omega /delta /infinity /phi /element /intersection
- /equivalence /plusminus /greaterequal /lessequal /integraltp /integralbt /divide /.notdef
- /degree /dotmath /periodcentered /radical /.notdef /twosuperior /.notdef /.notdef
-] def
-
-% Utility procedures
-
-/invertencoding % <array> invertencoding <dict>
- { 256 dict exch dup length 1 sub -1 0
- { % stack: dict array index
- 2 copy get /.notdef ne
- { 2 copy get exch 3 index 3 1 roll put }
- { pop }
- ifelse
- } for
- pop
- } def
-
-/pmarray 256 array def
-/printmap % <chars> <decode> printmap -
- { mark 3 1 roll exch
- { 2 copy known { 1 index exch get } { pop 0 } ifelse exch
- }
- forall pop
- pmarray 0 counttomark 2 sub getinterval astore
- ([) print dup length =only 0 exch (] = {\n ) exch
- { exch print =only
- 1 add 15 and dup 0 eq { (,\n ) } { (, ) } ifelse
- }
- forall pop pop (\n};\n) print pop
- } def
-
-/decodeStd StandardEncoding invertencoding def
-/decodeISO ISOLatin1Encoding
- % Remove the redundant characters
- dup length array copy
- [8#222 8#225 8#230 8#233 8#240] { 2 copy /.notdef put pop } forall
-invertencoding def
-/decodeSym SymbolEncoding invertencoding def
-
-/decodeANSI ANSIEncoding invertencoding def
-/decodeOEM OEMEncoding invertencoding def
-
-% Construct the map from Symbol to OEM.
-
-(\nprivate const byte far_data gs_map_symbol_to_oem) print
-SymbolEncoding decodeOEM printmap
-
-% Construct the map from ISOLatin1 to OEM.
-
-(\nprivate const byte far_data gs_map_iso_to_oem) print
-ISOLatin1Encoding decodeOEM printmap
-
-% Construct the map from Standard to ISOLatin1.
-
-(\nprivate const byte far_data gs_map_std_to_iso) print
-StandardEncoding decodeISO printmap
-
-% Construct the map from ISOLatin1 to Standard.
-% The Windows driver doesn't need this, but the X11 driver does.
-
-(\nprivate const byte far_data gs_map_iso_to_std) print
-ISOLatin1Encoding decodeStd printmap
-
-quit
+% Copyright (C) 1993 Aladdin Enterprises. All rights reserved.
+%
+% This software is provided AS-IS with no warranty, either express or
+% implied.
+%
+% This software is distributed under license and may not be copied,
+% modified or distributed except as expressly authorized under the terms
+% of the license contained in the file LICENSE in this distribution.
+%
+% For more information about licensing, please refer to
+% http://www.ghostscript.com/licensing/. For information on
+% commercial licensing, go to http://www.artifex.com/licensing/ or
+% contact Artifex Software, Inc., 101 Lucas Valley Road #110,
+% San Rafael, CA 94903, U.S.A., +1(415)492-9861.
+
+% $Id: winmaps.ps 6855 2006-06-14 21:03:34Z giles $
+% winmaps.ps - make maps between PostScript encodings and Windows
+% character sets.
+
+% Define the two Windows encodings.
+
+/ANSIEncoding
+ ISOLatin1Encoding 256 array copy
+ dup 16#90 /.notdef put
+ 16#93 1 16#9f { 2 copy /.notdef put pop } for
+def
+
+/OEMEncoding [
+ /.notdef /.notdef /.notdef /heart /diamond /club /spade /bullet
+ 8 { /.notdef } repeat
+ /.notdef /.notdef /.notdef /.notdef /paragraph /section /.notdef /.notdef
+ /arrowup /arrowdown /arrowright /arrowleft /.notdef /arrowboth /.notdef /.notdef
+ StandardEncoding 32 96 getinterval aload pop
+ /Ccedilla /udieresis /eacute /acircumflex /adieresis /agrave /aring /ccedilla
+ /ecircumflex /edieresis /egrave /idieresis /igrave /Adieresis /Aring
+ /Eacute /ae /AE /ocircumflex /odieresis /ograve /ucircumflex /ugrave
+ /ydieresis /Odieresis /Udieresis /cent /sterling /yen /.notdef /florin
+ /aacute /iacute /oacute /uacute /ntilde /Ntilde /ordfeminine /ordmasculine
+ /questiondown /.notdef /logicalnot /onehalf /onequarter /exclamdown /guillemotleft /guillemotright
+ 48 { /.notdef } repeat
+ /alpha /beta /Gamma /Pi /Sigma /sigma /mu /tau
+ /Phi /Theta /Omega /delta /infinity /phi /element /intersection
+ /equivalence /plusminus /greaterequal /lessequal /integraltp /integralbt /divide /.notdef
+ /degree /dotmath /periodcentered /radical /.notdef /twosuperior /.notdef /.notdef
+] def
+
+% Utility procedures
+
+/invertencoding % <array> invertencoding <dict>
+ { 256 dict exch dup length 1 sub -1 0
+ { % stack: dict array index
+ 2 copy get /.notdef ne
+ { 2 copy get exch 3 index 3 1 roll put }
+ { pop }
+ ifelse
+ } for
+ pop
+ } def
+
+/pmarray 256 array def
+/printmap % <chars> <decode> printmap -
+ { mark 3 1 roll exch
+ { 2 copy known { 1 index exch get } { pop 0 } ifelse exch
+ }
+ forall pop
+ pmarray 0 counttomark 2 sub getinterval astore
+ ([) print dup length =only 0 exch (] = {\n ) exch
+ { exch print =only
+ 1 add 15 and dup 0 eq { (,\n ) } { (, ) } ifelse
+ }
+ forall pop pop (\n};\n) print pop
+ } def
+
+/decodeStd StandardEncoding invertencoding def
+/decodeISO ISOLatin1Encoding
+ % Remove the redundant characters
+ dup length array copy
+ [8#222 8#225 8#230 8#233 8#240] { 2 copy /.notdef put pop } forall
+invertencoding def
+/decodeSym SymbolEncoding invertencoding def
+
+/decodeANSI ANSIEncoding invertencoding def
+/decodeOEM OEMEncoding invertencoding def
+
+% Construct the map from Symbol to OEM.
+
+(\nprivate const byte far_data gs_map_symbol_to_oem) print
+SymbolEncoding decodeOEM printmap
+
+% Construct the map from ISOLatin1 to OEM.
+
+(\nprivate const byte far_data gs_map_iso_to_oem) print
+ISOLatin1Encoding decodeOEM printmap
+
+% Construct the map from Standard to ISOLatin1.
+
+(\nprivate const byte far_data gs_map_std_to_iso) print
+StandardEncoding decodeISO printmap
+
+% Construct the map from ISOLatin1 to Standard.
+% The Windows driver doesn't need this, but the X11 driver does.
+
+(\nprivate const byte far_data gs_map_iso_to_std) print
+ISOLatin1Encoding decodeStd printmap
+
+quit