]> git.lizzy.rs Git - plan9front.git/blob - sys/lib/ghostscript/gs_mgl_e.ps
Import sources from 2011-03-30 iso image - sys/lib
[plan9front.git] / sys / lib / ghostscript / gs_mgl_e.ps
1 %    Copyright (C) 1999, 2000 Aladdin Enterprises.  All rights reserved.
2
3 % This software is provided AS-IS with no warranty, either express or
4 % implied.
5
6 % This software is distributed under license and may not be copied,
7 % modified or distributed except as expressly authorized under the terms
8 % of the license contained in the file LICENSE in this distribution.
9
10 % For more information about licensing, please refer to
11 % http://www.ghostscript.com/licensing/. For information on
12 % commercial licensing, go to http://www.artifex.com/licensing/ or
13 % contact Artifex Software, Inc., 101 Lucas Valley Road #110,
14 % San Rafael, CA  94903, U.S.A., +1(415)492-9861.
15
16 % $Id: gs_mgl_e.ps,v 1.5 2002/02/21 21:49:28 giles Exp $
17 % Define the Macintosh standard glyph encoding vector.
18 % This is not an Encoding strictly speaking, but we treat it like one.
19 /currentglobal where
20  { pop currentglobal { setglobal } true setglobal }
21  { { } }
22 ifelse
23 /MacRomanEncoding .findencoding
24 /MacGlyphEncoding
25     /.notdef /.null /CR
26 % 3
27 4 index 32 95 getinterval aload pop
28 % 98
29 99 index 128 45 getinterval aload pop
30 % 143
31     /notequal /AE
32         /Oslash /infinity /plusminus /lessequal /greaterequal
33     /yen /mu1 /partialdiff /summation /product
34         /pi /integral /ordfeminine /ordmasculine /Ohm
35     /ae /oslash /questiondown /exclamdown /logicalnot
36         /radical /florin /approxequal /increment /guillemotleft
37     /guillemotright /ellipsis /nbspace
38 % 173
39 174 index 203 12 getinterval aload pop
40     /lozenge
41 % 186
42 187 index 216 24 getinterval aload pop
43     /applelogo
44 % 211
45 212 index 241 7 getinterval aload pop
46     /overscore
47 % 219
48 220 index 249 7 getinterval aload pop
49 % 226
50         /Lslash /lslash /Scaron /scaron
51     /Zcaron /zcaron /brokenbar /Eth /eth
52         /Yacute /yacute /Thorn /thorn /minus
53     /multiply /onesuperior /twosuperior /threesuperior /onehalf
54         /onequarter /threequarters /franc /Gbreve /gbreve
55                 % The TrueType documentation says the next glyph is named
56                 % Idot, but the Adobe standard name for this glyph is
57                 % Idotaccent.
58     /Idotaccent /Scedilla /scedilla /Cacute /cacute
59         /Ccaron /ccaron /dmacron
60 260 -1 roll pop         % delete MacRomanEncoding
61 258 packedarray
62 7 1 index .registerencoding
63 .defineencoding
64 exec