| 2 |
- |
1 |
% Copyright (C) 1993, 1994 Aladdin Enterprises. All rights reserved.
|
|
|
2 |
%
|
|
|
3 |
% This file is part of Aladdin Ghostscript.
|
|
|
4 |
%
|
|
|
5 |
% Aladdin Ghostscript is distributed with NO WARRANTY OF ANY KIND. No author
|
|
|
6 |
% or distributor accepts any responsibility for the consequences of using it,
|
|
|
7 |
% or for whether it serves any particular purpose or works at all, unless he
|
|
|
8 |
% or she says so in writing. Refer to the Aladdin Ghostscript Free Public
|
|
|
9 |
% License (the "License") for full details.
|
|
|
10 |
%
|
|
|
11 |
% Every copy of Aladdin Ghostscript must include a copy of the License,
|
|
|
12 |
% normally in a plain ASCII text file named PUBLIC. The License grants you
|
|
|
13 |
% the right to copy, modify and redistribute Aladdin Ghostscript, but only
|
|
|
14 |
% under certain conditions described in the License. Among other things, the
|
|
|
15 |
% License requires that the copyright notice and this notice be preserved on
|
|
|
16 |
% all copies.
|
|
|
17 |
|
|
|
18 |
% $Id: gs_iso_e.ps $
|
|
|
19 |
% Define the ISO Latin-1 encoding vector.
|
|
|
20 |
% The first half is the same as the standard encoding,
|
|
|
21 |
% except for minus instead of hyphen at code 055.
|
|
|
22 |
/ISOLatin1Encoding
|
|
|
23 |
StandardEncoding 0 45 getinterval aload pop
|
|
|
24 |
/minus
|
|
|
25 |
StandardEncoding 46 82 getinterval aload pop
|
|
|
26 |
% NOTE: the following are missing in the Adobe documentation,
|
|
|
27 |
% but appear in the displayed table:
|
|
|
28 |
% macron at 0225, dieresis at 0230, cedilla at 0233, space at 0240.
|
|
|
29 |
% This is an error in the Red Book, corrected in Adobe TN 5085.
|
|
|
30 |
% \20x
|
|
|
31 |
/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
|
|
|
32 |
/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
|
|
|
33 |
/dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent
|
|
|
34 |
/dieresis /.notdef /ring /cedilla /.notdef /hungarumlaut /ogonek /caron
|
|
|
35 |
% \24x
|
|
|
36 |
/space /exclamdown /cent /sterling
|
|
|
37 |
/currency /yen /brokenbar /section
|
|
|
38 |
/dieresis /copyright /ordfeminine /guillemotleft
|
|
|
39 |
/logicalnot /hyphen /registered /macron
|
|
|
40 |
/degree /plusminus /twosuperior /threesuperior
|
|
|
41 |
/acute /mu /paragraph /periodcentered
|
|
|
42 |
/cedilla /onesuperior /ordmasculine /guillemotright
|
|
|
43 |
/onequarter /onehalf /threequarters /questiondown
|
|
|
44 |
% \30x
|
|
|
45 |
/Agrave /Aacute /Acircumflex /Atilde
|
|
|
46 |
/Adieresis /Aring /AE /Ccedilla
|
|
|
47 |
/Egrave /Eacute /Ecircumflex /Edieresis
|
|
|
48 |
/Igrave /Iacute /Icircumflex /Idieresis
|
|
|
49 |
/Eth /Ntilde /Ograve /Oacute
|
|
|
50 |
/Ocircumflex /Otilde /Odieresis /multiply
|
|
|
51 |
/Oslash /Ugrave /Uacute /Ucircumflex
|
|
|
52 |
/Udieresis /Yacute /Thorn /germandbls
|
|
|
53 |
% \34x
|
|
|
54 |
/agrave /aacute /acircumflex /atilde
|
|
|
55 |
/adieresis /aring /ae /ccedilla
|
|
|
56 |
/egrave /eacute /ecircumflex /edieresis
|
|
|
57 |
/igrave /iacute /icircumflex /idieresis
|
|
|
58 |
/eth /ntilde /ograve /oacute
|
|
|
59 |
/ocircumflex /otilde /odieresis /divide
|
|
|
60 |
/oslash /ugrave /uacute /ucircumflex
|
|
|
61 |
/udieresis /yacute /thorn /ydieresis
|
|
|
62 |
% Make an array on large systems, a packed array on small ones.
|
|
|
63 |
256
|
|
|
64 |
vmstatus exch pop exch pop
|
|
|
65 |
100000 ge { array astore readonly } { packedarray } ifelse
|
|
|
66 |
def
|
|
|
67 |
1 ISOLatin1Encoding .registerencoding
|
|
|
68 |
/ISOLatin1Encoding ISOLatin1Encoding .defineencoding
|