shithub: riscv

ref: 678be8399090b9eb90f983b1b4105495893f57f1
dir: /sys/src/cmd/gs/lib/gs_wl2_e.ps/

View raw version
%    Copyright (C) 1996 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: gs_wl2_e.ps,v 1.4 2002/02/21 21:49:28 giles Exp $
% Define the Windows 3.1 Latin 2 encoding vector (H-P Symbol set 9E).
/currentglobal where
 { pop currentglobal { setglobal } true setglobal }
 { { } }
ifelse
/Win32Latin2Encoding
ISOLatin1Encoding 0 39 getinterval aload pop
    /quotesingle
ISOLatin1Encoding 40 5 getinterval aload pop
    /hyphen
ISOLatin1Encoding 46 50 getinterval aload pop
    /grave
ISOLatin1Encoding 97 30 getinterval aload pop
    /graybox
% \20x
    /.notdef /.notdef /quotesinglbase /.notdef
	/quotedblbase /ellipsis /dagger /daggerdbl
    /.notdef /perthousand /Scaron /guilsinglleft
	/Sacute /Tcaron /Zcaron /Zacute
    /.notdef /quoteleft /quoteright /quotedblleft
	/quotedblright /bullet /endash /emdash
    /.notdef /trademark /scaron /guilsinglright
	/sacute /tcaron /zcaron /zacute
    /.notdef /caron /breve /Lslash
	/currency /Aogonek /brokenbar /section
    /dieresis /copyright /Scedilla /guillemotleft
	/logicalnot /softhyphen /registered /Zdotaccent
    /degree /plusminus /ogonek /lslash
	/acute /mu /paragraph /periodcentered
    /cedilla /aogonek /scedilla /guillemotright
	/Lcaron /hungarumlaut /lcaron /zdotaccent
% \30x
    /Racute /Aacute /Acircumflex /Abreve
	/Adieresis /Lacute /Cacute /Ccedilla
    /Ccaron /Eacute /Eogonek /Edieresis
	/Ecaron /Iacute /Icircumflex /Dcaron
    /Dcroat /Nacute /Ncaron /Oacute
	/Ocircumflex /Ohungarumlaut /Odieresis /multiply
    /Rcaron /Uring /Uacute /Uhungarumlaut
	/Udieresis /Yacute /Tcommaaccent /germandbls
    /racute /aacute /acircumflex /abreve
	/adieresis /lacute /cacute /ccedilla
    /ccaron /eacute /eogonek /edieresis
	/ecaron /iacute /icircumflex /dcaron
    /dcroat /nacute /ncaron /oacute
	/ocircumflex /ohungarumlaut /odieresis /divide
    /rcaron /uring /uacute /uhungarumlaut
	/udieresis /yacute /tcommaaccent /dotaccent
256 packedarray .defineencoding
exec