%    Copyright (C) 1994, 1999 Aladdin Enterprises.  All rights reserved.
% 
% This file is part of AFPL Ghostscript.
% 
% AFPL Ghostscript is distributed with NO WARRANTY OF ANY KIND.  No author or
% distributor accepts any responsibility for the consequences of using it, or
% for whether it serves any particular purpose or works at all, unless he or
% she says so in writing.  Refer to the Aladdin Free Public License (the
% "License") for full details.
% 
% Every copy of AFPL Ghostscript must include a copy of the License, normally
% in a plain ASCII text file named PUBLIC.  The License grants you the right
% to copy, modify and redistribute AFPL Ghostscript, but only under certain
% conditions described in the License.  Among other things, the License
% requires that the copyright notice and this notice be preserved on all
% copies.

% $Id: gs_mro_e.ps,v 1.2 2000/09/19 18:29:11 lpd Exp $
% Define the MacRoman encoding vector.
/currentglobal where
 { pop currentglobal { setglobal } true setglobal }
 { { } }
ifelse
/MacRomanEncoding
StandardEncoding 0 39 getinterval aload pop
    /quotesingle
StandardEncoding 40 56 getinterval aload pop
    /grave
StandardEncoding 97 31 getinterval aload pop
% \20x
    /Adieresis /Aring /Ccedilla /Eacute /Ntilde /Odieresis /Udieresis /aacute
    /agrave /acircumflex /adieresis /atilde /aring /ccedilla /eacute /egrave
    /ecircumflex /edieresis /iacute /igrave
	/icircumflex /idieresis /ntilde /oacute
    /ograve /ocircumflex /odieresis /otilde
	/uacute /ugrave /ucircumflex /udieresis
% \24x
    /dagger /degree /cent /sterling /section /bullet /paragraph /germandbls
    /registered /copyright /trademark /acute /dieresis /.notdef /AE /Oslash
    /.notdef /plusminus /.notdef /.notdef /yen /mu /.notdef /.notdef
    /.notdef /.notdef /.notdef /ordfeminine /ordmasculine /.notdef /ae /oslash
% \30x
    /questiondown /exclamdown /logicalnot /.notdef
	/florin /.notdef /.notdef /guillemotleft
    /guillemotright /ellipsis /space /Agrave /Atilde /Otilde /OE /oe
    /endash /emdash /quotedblleft /quotedblright
	/quoteleft /quoteright /divide /.notdef
	% NOTE: Euro should replace currency, but the PDF 1.3 documentation
	% explicitly says it does not.
    /ydieresis /Ydieresis /fraction /currency
	/guilsinglleft /guilsinglright /fi /fl
% \34x
    /daggerdbl /periodcentered /quotesinglbase /quotedblbase
	/perthousand /Acircumflex /Ecircumflex /Aacute
    /Edieresis /Egrave /Iacute /Icircumflex
	/Idieresis /Igrave /Oacute /Ocircumflex
    /.notdef /Ograve /Uacute /Ucircumflex
	/Ugrave /dotlessi /circumflex /tilde
    /macron /breve /dotaccent /ring /cedilla /hungarumlaut /ogonek /caron
256 packedarray
5 1 index .registerencoding
.defineencoding
exec