summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlgs/lib/winmaps.ps
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlgs/lib/winmaps.ps')
-rw-r--r--Master/tlpkg/tlgs/lib/winmaps.ps106
1 files changed, 0 insertions, 106 deletions
diff --git a/Master/tlpkg/tlgs/lib/winmaps.ps b/Master/tlpkg/tlgs/lib/winmaps.ps
deleted file mode 100644
index a386f5a4647..00000000000
--- a/Master/tlpkg/tlgs/lib/winmaps.ps
+++ /dev/null
@@ -1,106 +0,0 @@
-% 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