Mail Archives: cygwin/2002/06/07/03:52:02
------=_NextPart_000_0008_01C20E09.4A0E4960
Content-Type: text/plain;
charset="us-ascii"
Content-Transfer-Encoding: 7bit
> -----Original Message-----
> From: Dario Alcocer [mailto:alcocer AT helixdigital DOT com]
> Sent: den 6 juni 2002 23:06
> To: James Peroulas
> Cc: McDougall AT agecon DOT purdue DOT edu; cygwin AT cygwin DOT com
> Subject: Re: GS ps2pdf
>
>
> >>>>> "James" == James Peroulas <james DOT peroulas AT ateliertelecom DOT se> writes:
>
> James> Hi all, I noticed on the cygwin mailing list that you guys
> James> were having the same problem that I am
> James> having. Specifically, "ps2pdf" gives me the error message
> James> "**** Unable to open the initial device, quitting."
>
> NOTE: I've moved this to the Cygwin mailing list, where this kind of
> discussion belongs...
>
> I've not seen this problem myself, so all I can say is: make sure you
> are using the latest release. If you're still having problems, please
> feel free to e-mail the Cygwin mailing list with more specific
> information, like maybe a small PS file sample which causes the
> failure mode you're referring to.
Hi, I'm the one that made the original post. I'm using the latest version of
cygwin+everything (as of 2002-06-06) on Windows 2000.
I've attached a simple postscript file and when I use the windows native
ghostscript and ghostview applications, I can both open this postscript file
and convert it into a valid pdf file.
When I run ps2pdf in cygwin, however, I get the following:
DESKTOP62 513: ps2pdf test.ps
**** Unable to open the initial device, quitting.
I've also tried calling ghostscript directly, with the same results:
DESKTOP62 518:
gs -dSAFER -dCompatibilityLevel=1.2 -q -dNOPAUSE -dBATCH -sDEVICE=pdfwrite -
sOutputFile=test.pdf -c .setpdfwrite -f test.ps
**** Unable to open the initial device, quitting.
The problem persists no matter what postscript file I try to convert.
However, if I change the device, I can get the conversion to complete:
DESKTOP62 523:
gs -dSAFER -dCompatibilityLevel=1.2 -q -dNOPAUSE -dBATCH -sDEVICE=bmpmono -s
OutputFile=test.bmp -c .setpdfwrite -f test.ps
%%[ ProductName: GNU Ghostscript ]%%
%%[Page: 1]%%
%%[LastPage]%%
So, the problem appears to be with the pdfwrite output device on
ghostscript.
Any ideas?
James
P.S. I am not running under "Administrator" privleges under windows 2000.
------=_NextPart_000_0008_01C20E09.4A0E4960
Content-Type: application/postscript;
name="test.ps"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
filename="test.ps"
%!PS-Adobe-3.0
%%Title: Microsoft Word - Document1
%%Creator: PScript5.dll Version 5.2
%%CreationDate: 6/7/2002 9:31:0
%%For: p0032c
%%BoundingBox: (atend)
%%Pages: (atend)
%%Orientation: Portrait
%%PageOrder: Special
%%DocumentNeededResources: (atend)
%%DocumentSuppliedResources: (atend)
%%DocumentData: Clean7Bit
%%TargetDevice: (Generic PostScript Printer) (2010.0) 2
%%LanguageLevel: 2
%%EndComments
%%BeginDefaults
%%PageBoundingBox: 18 8 593 784
%%ViewingOrientation: 1 0 0 1
%%EndDefaults
%%BeginProlog
%%BeginResource: file Pscript_WinNT_ErrorHandler 5.0 0
/currentpacking where{pop/oldpack currentpacking def/setpacking =
where{pop false
setpacking}if}if/$brkpage 64 dict def $brkpage begin/prnt{dup =
type/stringtype
ne{=3Dstring cvs}if dup length 6 mul/tx exch def/ty 10 def =
currentpoint/toy exch
def/tox exch def 1 setgray newpath tox toy 2 sub moveto 0 ty rlineto tx =
0
rlineto 0 ty neg rlineto closepath fill tox toy moveto 0 setgray =
show}bind def
/nl{currentpoint exch pop lmargin exch moveto 0 -10 =
rmoveto}def/=3D=3D{/cp 0 def
typeprint nl}def/typeprint{dup type exec}readonly def/lmargin 72 =
def/rmargin 72
def/tprint{dup length cp add rmargin gt{nl/cp 0 def}if dup length cp =
add/cp
exch def prnt}readonly def/cvsprint{=3Dstring cvs tprint( =
)tprint}readonly def
/integertype{cvsprint}readonly def/realtype{cvsprint}readonly =
def/booleantype
{cvsprint}readonly def/operatortype{(--)tprint =3Dstring cvs tprint(-- =
)tprint}
readonly def/marktype{pop(-mark- )tprint}readonly def/dicttype{pop
(-dictionary- )tprint}readonly def/nulltype{pop(-null- )tprint}readonly =
def
/filetype{pop(-filestream- )tprint}readonly def/savetype{pop(-savelevel- =
)
tprint}readonly def/fonttype{pop(-fontid- )tprint}readonly =
def/nametype{dup
xcheck not{(/)tprint}if cvsprint}readonly def/stringtype{dup =
rcheck{(\()tprint
tprint(\))tprint}{pop(-string- )tprint}ifelse}readonly def/arraytype{dup =
rcheck
{dup =
xcheck{({)tprint{typeprint}forall(})tprint}{([)tprint{typeprint}forall(])=
tprint}ifelse}{pop(-array- )tprint}ifelse}readonly =
def/packedarraytype{dup
rcheck{dup =
xcheck{({)tprint{typeprint}forall(})tprint}{([)tprint{typeprint}
forall(])tprint}ifelse}{pop(-packedarray- )tprint}ifelse}readonly =
def/courier
/Courier findfont 10 scalefont def end errordict/handleerror{systemdict =
begin
$error begin $brkpage begin newerror{/newerror false store vmstatus pop =
pop 0
ne{grestoreall}if errorname(VMerror)ne{showpage}if initgraphics courier =
setfont
lmargin 720 moveto errorname(VMerror)eq{userdict/ehsave known{clear =
userdict
/ehsave get restore 2 vmreclaim}if vmstatus exch pop exch pop PrtVMMsg}{
(ERROR: )prnt errorname prnt nl(OFFENDING COMMAND: )prnt/command load =
prnt
$error/ostack known{nl nl(STACK:)prnt nl nl $error/ostack get aload =
length{=3D=3D}
repeat}if}ifelse systemdict/showpage get exec(%%[ Error: )print =
errorname
=3Dprint(; OffendingCommand: )print/command load =3Dprint( ]%%)=3D =
flush}if end end
end}dup 0 systemdict put dup 4 $brkpage put bind readonly =
put/currentpacking
where{pop/setpacking where{pop oldpack setpacking}if}if
%%EndResource
userdict /Pscript_WinNT_Incr 230 dict dup begin put
%%BeginResource: file Pscript_FatalError 5.0 0
userdict begin/FatalErrorIf{{initgraphics findfont 1 index 0 eq{exch =
pop}{dup
length dict begin{1 index/FID ne{def}{pop pop}ifelse}forall/Encoding
{ISOLatin1Encoding}stopped{StandardEncoding}if def currentdict end
/ErrFont-Latin1 exch definefont}ifelse exch scalefont setfont =
counttomark 3 div
cvi{moveto show}repeat showpage quit}{cleartomark}ifelse}bind def end
%%EndResource
userdict begin/PrtVMMsg{vmstatus exch sub exch pop gt{[
(This job requires more memory than is available in this printer.)100 =
500
(Try one or more of the following, and then print again:)100 485
(For the output format, choose Optimize For Portability.)115 470
(In the Device Settings page, make sure the Available PostScript Memory =
is accurate.)
115 455(Reduce the number of fonts in the document.)115 440
(Print the document in parts.)115 425 12/Times-Roman showpage
(%%[ PrinterError: Low Printer VM ]%%)=3D true FatalErrorIf}if}bind def =
end
version cvi 2016 ge{/VM?{pop}bind def}{/VM? userdict/PrtVMMsg get =
def}ifelse
105000 VM?
%%BeginResource: file Pscript_Win_Basic 5.0 0
/d/def load def/,/load load d/~/exch , d/?/ifelse , d/!/pop , d/`/begin =
, d/^
/index , d/@/dup , d/+/translate , d/$/roll , d/U/userdict , d/M/moveto =
, d/-
/rlineto , d/&/currentdict , d/:/gsave , d/;/grestore , d/F/false , =
d/T/true ,
d/N/newpath , d/E/end , d/Ac/arc , d/An/arcn , d/A/ashow , =
d/D/awidthshow , d/C
/closepath , d/V/div , d/O/eofill , d/L/fill , d/I/lineto , d/-c/curveto =
, d/-M
/rmoveto , d/+S/scale , d/Ji/setfont , d/Lc/setlinecap , =
d/Lj/setlinejoin , d
/Lw/setlinewidth , d/Lm/setmiterlimit , d/sd/setdash , d/S/show , =
d/LH/showpage
, d/K/stroke , d/W/widthshow , d/R/rotate , d/L2? false/languagelevel =
where{pop
languagelevel 2 ge{pop true}if}if d L2?{/xS/xshow , d/yS/yshow , =
d/zS/xyshow ,
d}if/b{bind d}bind d/bd{bind d}bind d/xd{~ d}bd/ld{, d}bd/bn/bind =
ld/lw/Lw ld
/lc/Lc ld/lj/Lj ld/sg/setgray ld/ADO_mxRot null d/self & d/OrgMx matrix
currentmatrix d/reinitialize{: OrgMx =
setmatrix[/TextInit/GraphInit/UtilsInit
counttomark{@ where{self eq}{F}?{cvx exec}{!}?}repeat cleartomark ;}b
/initialize{`{/Pscript_Win_Data where{!}{U/Pscript_Win_Data & =
put}?/ADO_mxRot ~
d/TextInitialised? F d reinitialize E}{U/Pscript_Win_Data 230 dict @ ` =
put
/ADO_mxRot ~ d/TextInitialised? F d reinitialize}?}b/terminate{!{& self =
eq
{exit}{E}?}loop E}b/suspend/terminate , d/resume{` Pscript_Win_Data `}b =
U `
/lucas 21690 d/featurebegin{countdictstack =
lucas[}b/featurecleanup{stopped
{cleartomark @ lucas eq{! exit}if}loop countdictstack ~ sub @ 0 =
gt{{E}repeat}
{!}?}b E/snap{transform 0.25 sub round 0.25 add ~ 0.25 sub round 0.25 =
add ~
itransform}b/dsnap{dtransform round ~ round ~ =
idtransform}b/nonzero_round{@ 0.5
ge{round}{@ -0.5 lt{round}{0 ge{1}{-1}?}?}?}b/nonzero_dsnap{dtransform
nonzero_round ~ nonzero_round ~ idtransform}b U<04>cvn{}put/rr{1 ^ 0 - 0 =
~ -
neg 0 - C}b/irp{4 -2 $ + +S fx 4 2 $ M 1 ^ 0 - 0 ~ - neg 0 -}b/rp{4 2 $ =
M 1 ^ 0
- 0 ~ - neg 0 -}b/solid{[]0 sd}b/g{@ not{U/DefIf_save save put}if =
U/DefIf_bool
2 ^ put}b/DefIf_El{if U/DefIf_bool get not @{U/DefIf_save get =
restore}if}b/e
{DefIf_El !}b/UDF{L2?{undefinefont}{!}?}b/UDR{L2?{undefineresource}{! =
!}?}b
/freeVM{/Courier findfont[40 0 0 -40 0 0]makefont Ji 2 =
vmreclaim}b/hfRedefFont
{findfont @ length dict `{1 ^/FID ne{d}{! !}?}forall & E @ ` =
~{/CharStrings 1
dict `/.notdef 0 d & E d}if/Encoding 256 array 0 1 255{1 ^ ~/.notdef =
put}for d
E definefont !}bind d/hfMkCIDFont{/CIDFont findresource @ length 2 add =
dict `{1
^ @/FID eq ~ @/XUID eq ~/UIDBase eq or or{! !}{d}?}forall/CDevProc ~ =
d/Metrics2
16 dict d/CIDFontName 1 ^ d & E 1 ^ ~/CIDFont defineresource =
![~]composefont !}
bind d
%%EndResource
%%BeginResource: file Pscript_Win_Utils_L2 5.0 0
/rf/rectfill , d/fx{1 1 dtransform @ 0 ge{1 sub 0.5}{1 add -0.5}? 3 -1 $ =
@ 0 ge
{1 sub 0.5}{1 add -0.5}? 3 1 $ 4 1 $ idtransform 4 -2 $ =
idtransform}b/BZ{4 -2 $
snap + +S fx rf}b/rs/rectstroke , d/rc/rectclip , =
d/UtilsInit{currentglobal{F
setglobal}if}b/scol{! setcolor}b/colspA/DeviceGray d/colspABC/DeviceRGB =
d
/colspRefresh{colspABC setcolorspace}b/SetColSpace{colspABC =
setcolorspace}b
/resourcestatus where{!/ColorRendering/ProcSet resourcestatus{! ! =
T}{F}?}{F}?
not{/ColorRendering<</GetHalftoneName{currenthalftone @/HalftoneName =
known{
/HalftoneName get}{!/none}?}bn/GetPageDeviceName{currentpagedevice @
/PageDeviceName known{/PageDeviceName get @ null =
eq{!/none}if}{!/none}?}bn
/GetSubstituteCRD{!/DefaultColorRendering/ColorRendering =
resourcestatus{! !
/DefaultColorRendering}{(DefaultColorRendering*){cvn exit}127 string
/ColorRendering resourceforall}?}bn>>/defineresource where{!/ProcSet
defineresource !}{! !}?}if/buildcrdname{/ColorRendering/ProcSet =
findresource `
mark GetHalftoneName @ type @/nametype ne ~/stringtype ne =
and{!/none}if(.)
GetPageDeviceName @ type @/nametype ne ~/stringtype ne and{!/none}if(.)5 =
^ 0 5
-1 1{^ length add}for string 6 1 $ 5 ^ 5{~ 1 ^ cvs length 1 ^ length 1 ^ =
sub
getinterval}repeat ! cvn 3 1 $ ! ! E}b/definecolorrendering{~ =
buildcrdname ~
/ColorRendering defineresource !}b/findcolorrendering where{!}{
/findcolorrendering{buildcrdname @/ColorRendering resourcestatus{! ! T}{
/ColorRendering/ProcSet findresource ` GetSubstituteCRD E F}?}b}?
/selectcolorrendering{findcolorrendering !/ColorRendering findresource
setcolorrendering}b/G2UBegin{findresource/FontInfo =
get/GlyphNames2Unicode get
`}bind d/G2CCBegin{findresource/FontInfo get/GlyphNames2HostCode get =
`}bind d
/G2UEnd{E}bind d/AddFontInfoBegin{/FontInfo 8 dict @ `}bind =
d/AddFontInfo{
/GlyphNames2Unicode 16 dict d/GlyphNames2HostCode 16 dict d}bind d
/AddFontInfoEnd{E d}bind d/T0AddCFFMtx2{/CIDFont findresource/Metrics2 =
get ` d
E}bind d
%%EndResource
end
%%EndProlog
%%BeginSetup
statusdict begin (%%[ ProductName: ) print product print ( ]%%)=3D flush =
end
[ 1 0 0 1 0 0 ] false Pscript_WinNT_Incr dup /initialize get exec
featurebegin{
%%BeginNonPPDFeature: JobTimeout 0
0 /languagelevel where{pop languagelevel}{1}ifelse 2 ge{1 dict =
dup/JobTimeout 4 -1 roll put setuserparams}{statusdict/setjobtimeout =
get exec}ifelse
%%EndNonPPDFeature
}featurecleanup
featurebegin{
%%BeginNonPPDFeature: WaitTimeout 300
300 /languagelevel where{pop languagelevel}{1}ifelse 2 ge{1 dict =
dup/WaitTimeout 4 -1 roll put setuserparams}{statusdict/waittimeout 3 -1 =
roll put}ifelse
%%EndNonPPDFeature
}featurecleanup
featurebegin{
%%BeginFeature: *PageSize Letter
<</DeferredMediaSelection true /PageSize [612 792] /ImagingBBox =
null>> setpagedevice
%%EndFeature
}featurecleanup
featurebegin{
%%BeginFeature: *Resolution 300dpi
%%EndFeature
}featurecleanup
1 setlinecap 1 setlinejoin
/mysetup [ 72 300 V 0 0 -72 300 V 18 784.00067 ] def=20
%%EndSetup
userdict begin /ehsave save def end
%%Page: 1 1
%%PageBoundingBox: 18 8 593 784
%%EndPageComments
%%BeginPageSetup
/DeviceRGB dup setcolorspace /colspABC exch def
mysetup concat colspRefresh
%%EndPageSetup
/DeviceGray dup setcolorspace /colspABC exch def
0 0 scol Pscript_WinNT_Incr begin
%%BeginResource: file Pscript_Text 5.0 0
/TextInit{TextInitialised? not{/Pscript_Windows_Font & =
d/TextInitialised? T d
/fM[1 0 0 1 0 0]d/mFM matrix d/iMat[1 0 0.212557 1 0 0]d}if}b/copyfont{1 =
^
length add dict `{1 ^/FID ne{d}{! !}?}forall & E}b/EncodeDict 11 dict =
d/bullets
{{/bullet}repeat}b/rF{3 copyfont @ ` ~ EncodeDict ~ get/Encoding ~ 3 ^/0 =
eq{&
/CharStrings known{CharStrings/Eth known not{! =
EncodeDict/ANSIEncodingOld get}
if}if}if d E}b/mF{@ 7 1 $ findfont ~{@/Encoding get @ StandardEncoding =
eq{! T}{
{ISOLatin1Encoding}stopped{! F}{eq}?{T}{@ ` T 32 1 127{Encoding 1 ^ get
StandardEncoding 3 -1 $ get eq and}for E}?}?}{F}?{1 ^ ~ rF}{0 copyfont}? =
6 -2 $
! ! ~ !/pd_charset @ where{~ get 128 eq{@ FDV 2 copy get @ length array =
copy
put pd_CoverFCRange}if}{!}? 2 ^ ~ definefont fM 5 4 -1 $ put fM 4 0 put =
fM
makefont Pscript_Windows_Font 3 1 $ put}b/sLT{: Lw -M currentpoint snap =
M 0 - 0
Lc K ;}b/xUP null d/yUP null d/uW null d/xSP null d/ySP null d/sW null =
d/sSU{N
/uW ~ d/yUP ~ d/xUP ~ d}b/sU{xUP yUP uW sLT}b/sST{N/sW ~ d/ySP ~ d/xSP ~ =
d}b/sT
{xSP ySP sW sLT}b/sR{: + R 0 0 M}b/sRxy{: matrix astore concat 0 0 =
M}b/eR/; , d
/AddOrigFP{{&/FontInfo known{&/FontInfo get length 6 add}{6}? dict `
/WinPitchAndFamily ~ d/WinCharSet ~ d/OrigFontType ~ d/OrigFontStyle ~ d
/OrigFontName ~ d & E/FontInfo ~ d}{! ! ! ! !}?}b/mFS{makefont
Pscript_Windows_Font 3 1 $ put}b/mF42D{0 copyfont `/FontName ~ d 2 copy =
~ sub 1
add dict `/.notdef 0 d 2 copy 1 ~{@ 3 ^ sub Encoding ~ get ~ d}for & E
/CharStrings ~ d ! ! & @ E/FontName get ~ definefont}b/mF42{15 dict ` @ =
4 1 $
FontName ~ d/FontType 0 d/FMapType 2 d/FontMatrix[1 0 0 1 0 0]d 1 ^ 254 =
add 255
idiv @ array/Encoding ~ d 0 1 3 -1 $ 1 sub{@ Encoding 3 1 $ =
put}for/FDepVector
Encoding length array d/CharStrings 2 dict `/.notdef 0 d & E d 0 1 =
Encoding
length 1 sub{@ @ 10 lt{! FontName length 1 add string}{100 lt{FontName =
length 2
add string}{FontName length 3 add string}?}? @ 0 FontName @ length =
string cvs
putinterval @ 3 -1 $ @ 4 1 $ 3 string cvs FontName length ~ putinterval =
cvn 1 ^
256 mul @ 255 add 3 -1 $ 4 ^ findfont mF42D FDepVector 3 1 $ put}for & @ =
E
/FontName get ~ definefont ! ! ! mF}b/mF_OTF_V{~ ! ~ ! 4 -1 $ ! findfont =
2 ^ ~
definefont fM @ @ 4 6 -1 $ neg put 5 0 put 90 matrix R matrix =
concatmatrix
makefont Pscript_Windows_Font 3 1 $ put}b/mF_TTF_V{3{~ !}repeat 3 -1 $ !
findfont 1 ^ ~ definefont Pscript_Windows_Font 3 1 $ put}b/UmF{L2?
{Pscript_Windows_Font ~ undef}{!}?}b/UmF42{@ findfont/FDepVector =
get{/FontName
get undefinefont}forall undefinefont}b
%%EndResource
end reinitialize
Pscript_WinNT_Incr begin
%%BeginResource: file Pscript_Encoding256 5.0 0
/CharCol256Encoding[/.notdef/breve/caron/dotaccent/dotlessi/fi/fl/fractio=
n
/hungarumlaut/Lslash/lslash/minus/ogonek/ring/Zcaron/zcaron/.notdef/.notd=
ef
/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef
/.notdef/.notdef/.notdef/.notdef/.notdef/space/exclam/quotedbl/numbersign=
/dollar/percent/ampersand/quotesingle/parenleft/parenright/asterisk/plus/=
comma
/hyphen/period/slash/zero/one/two/three/four/five/six/seven/eight/nine/co=
lon
/semicolon/less/equal/greater/question/at/A/B/C/D/E/F/G/H/I/J/K/L/M/N/O/P=
/Q/R/S
/T/U/V/W/X/Y/Z/bracketleft/backslash/bracketright/asciicircum/underscore/=
grave
/a/b/c/d/e/f/g/h/i/j/k/l/m/n/o/p/q/r/s/t/u/v/w/x/y/z/braceleft/bar/bracer=
ight
/asciitilde/.notdef/Euro/.notdef/quotesinglbase/florin/quotedblbase/ellip=
sis
/dagger/daggerdbl/circumflex/perthousand/Scaron/guilsinglleft/OE/.notdef
/.notdef/.notdef/.notdef/quoteleft/quoteright/quotedblleft/quotedblright/=
bullet
/endash/emdash/tilde/trademark/scaron/guilsinglright/oe/.notdef/.notdef
/Ydieresis/.notdef/exclamdown/cent/sterling/currency/yen/brokenbar/sectio=
n
/dieresis/copyright/ordfeminine/guillemotleft/logicalnot/.notdef/register=
ed
/macron/degree/plusminus/twosuperior/threesuperior/acute/mu/paragraph
/periodcentered/cedilla/onesuperior/ordmasculine/guillemotright/onequarte=
r
/onehalf/threequarters/questiondown/Agrave/Aacute/Acircumflex/Atilde/Adie=
resis
/Aring/AE/Ccedilla/Egrave/Eacute/Ecircumflex/Edieresis/Igrave/Iacute
/Icircumflex/Idieresis/Eth/Ntilde/Ograve/Oacute/Ocircumflex/Otilde/Odiere=
sis
/multiply/Oslash/Ugrave/Uacute/Ucircumflex/Udieresis/Yacute/Thorn/germand=
bls
/agrave/aacute/acircumflex/atilde/adieresis/aring/ae/ccedilla/egrave/eacu=
te
/ecircumflex/edieresis/igrave/iacute/icircumflex/idieresis/eth/ntilde/ogr=
ave
/oacute/ocircumflex/otilde/odieresis/divide/oslash/ugrave/uacute/ucircumf=
lex
/udieresis/yacute/thorn/ydieresis]def EncodeDict/256 CharCol256Encoding =
put
%%EndResource
end reinitialize
%%IncludeResource: font Times-Roman
Pscript_WinNT_Incr begin
%%BeginResource: file Pscript_Win_Euro_L2 5.0 0
/UseT3EuroFont{/currentdistillerparams where{pop currentdistillerparams
/CoreDistVersion get 4000 le}{false}ifelse}bind =
def/NewEuroT3Font?{dup/FontType
get 3 eq{dup/EuroFont known exch/BaseFont known and}{pop =
false}ifelse}bind def
/T1FontHasEuro{dup/CharStrings known not{dup =
NewEuroT3Font?{dup/EuroGlyphName
get exch/EuroFont get/CharStrings get exch known{true}{false}ifelse}{pop =
false}
ifelse}{dup/FontType get 1 eq{/CharStrings get/Euro known}{dup/InfoDict =
known{
/InfoDict get/Euro known}{/CharStrings get/Euro =
known}ifelse}ifelse}ifelse}bind
def/FontHasEuro{findfont dup/Blend known{pop =
true}{T1FontHasEuro}ifelse}bind
def/EuroEncodingIdx 1 def/EuroFontHdr{12 dict begin/FontInfo 10 dict dup =
begin
/version(001.000)readonly def/Notice(Copyright (c)1999 Adobe Systems
Incorporated. All Rights Reserved.)readonly def/FullName(Euro)readonly =
def
/FamilyName(Euro)readonly def/Weight(Regular)readonly def/isFixedPitch =
false
def/ItalicAngle 0 def/UnderlinePosition -100 def/UnderlineThickness 50 =
def end
readonly def/FontName/Euro def/Encoding 256 array 0 1 255{1 index =
exch/.notdef
put}for def/PaintType 0 def/FontType 1 def/FontMatrix[0.001 0 0 0.001 0 =
0]def
/FontBBox{-25 -23 1500 804}readonly def currentdict end dup/Private 20 =
dict dup
begin/ND{def}def/NP{put}def/lenIV -1 def/RD{string currentfile exch
readhexstring pop}def/-|{string currentfile exch readstring =
pop}executeonly def
/|-{def}executeonly def/|{put}executeonly def/BlueValues[-20 0 706 736 =
547 572]
|-/OtherBlues[-211 -203]|-/BlueScale 0.0312917 def/MinFeature{16 =
16}|-/StdHW
[60]|-/StdVW[71]|-/ForceBold false def/password 5839 def/Erode{8.5 dup 3 =
-1
roll 0.1 mul exch 0.5 sub mul cvi sub dup mul 71 0 dtransform dup mul =
exch dup
mul add le{pop pop 1.0 1.0}{pop pop 0.0 1.5}ifelse}def/OtherSubrs[{}{}{}
{systemdict/internaldict known not{pop 3}{1183615869 =
systemdict/internaldict
get exec dup/startlock known{/startlock get exec}{dup/strtlck =
known{/strtlck
get exec}{pop 3}ifelse}ifelse}ifelse}executeonly]|-/Subrs 5 array dup 0
<8E8B0C100C110C110C210B>put dup 1<8B8C0C100B>put dup 2<8B8D0C100B>put =
dup 3<0B>
put dup 4<8E8C8E0C100C110A0B>put |- 2 index/CharStrings 256 dict dup =
begin
/.notdef<8b8b0d0e>def end end put put dup/FontName get exch definefont =
pop}bind
def/AddEuroGlyph{2 index exch EuroEncodingIdx 1 eq{EuroFontHdr}if =
systemdict
begin/Euro findfont dup dup/Encoding get 5 1 roll/Private get =
begin/CharStrings
get dup 3 index known{pop pop pop pop end end}{begin 1 index exch def =
end end
end EuroEncodingIdx dup 1 add/EuroEncodingIdx exch def exch =
put}ifelse}bind def
/GetNewXUID{currentdict/XUID known{[7 XUID aload =
pop]true}{currentdict/UniqueID
known{[7 UniqueID]true}{false}ifelse}ifelse}bind =
def/BuildT3EuroFont{exch 16
dict begin dup/FontName exch def findfont dup/Encoding get/Encoding exch =
def
dup length 1 add dict copy dup/FID undef begin dup dup/FontName exch def
/Encoding 256 array 0 1 255{1 index exch/.notdef put}for def =
GetNewXUID{/XUID
exch def}if currentdict end definefont pop/BaseFont exch findfont 1000
scalefont def/EuroFont exch findfont 1000 scalefont def =
pop/EuroGlyphName exch
def/FontType 3 def/FontMatrix[.001 0 0 .001 0 0]def/FontBBox =
BaseFont/FontBBox
get def/Char 1 string def/BuildChar{exch dup begin/Encoding get 1 index =
get
/Euro eq{BaseFont =
T1FontHasEuro{false}{true}ifelse}{false}ifelse{EuroFont
setfont pop userdict/Idx 0 put EuroFont/Encoding get{EuroGlyphName =
eq{exit}
{userdict/Idx Idx 1 add put}ifelse}forall userdict/Idx get}{dup dup =
Encoding
exch get BaseFont/Encoding get 3 1 roll put BaseFont setfont}ifelse Char =
0 3 -1
roll put Char stringwidth newpath 0 0 moveto Char true charpath =
flattenpath
pathbbox setcachedevice 0 0 moveto Char show end}bind def currentdict =
end dup
/FontName get exch definefont pop}bind def/AddEuroToT1Font{dup findfont =
dup
length 10 add dict copy dup/FID undef begin/EuroFont 3 -1 roll findfont =
1000
scalefont def CharStrings dup length 1 add dict copy begin/Euro{EuroFont
setfont pop EuroGBBox aload pop setcachedevice 0 0 moveto EuroGName =
glyphshow}
bind def currentdict end/CharStrings exch def GetNewXUID{/XUID exch =
def}if 3 1
roll/EuroGBBox exch def/EuroGName exch def currentdict end definefont =
pop}bind
def/BuildNewFont{UseT3EuroFont{BuildT3EuroFont}{pop =
AddEuroToT1Font}ifelse}bind
def/UseObliqueEuro{findfont/FontMatrix get dup 2 get 0 eq exch dup 0 get =
exch 3
get eq and UseT3EuroFont or}bind def
%%EndResource
end reinitialize
7500 VM?
/Times-Roman FontHasEuro not
{
/Euro.Times-Roman
[500 0 24 -14 493 676 ]=20
<A3F8880DC0EB03F854F743950C0C037DA501F7A0BB01F805BB01F91EA501F869F8911584=
F73A0576068478827E7F8B087F8B70AC438B082A8BFB0D6471FB700863067C5B05BE068A
7E8B878B7D08750764067D5B05C206A0FB7BF71858E88B088F0AC0EB03F84BF789950C0C
037DA501F7A0BB01F805BB01F91EA501CA8BACAC998B08988B95809076088F0AC0EB03F8
54F743950C0C037DA501F7A0BB01F805BB01F91EA501A00692F73705750675FB09417667
8B083A8B43C182F75E08F7740699BB05FB84069C078B978C978B9708F7950699BB05FBA1
069AF755D5B3D18B08AB8BDD71A2FB0708090E>
AddEuroGlyph
/Euro /Times-Roman /Times-Roman-Copy BuildNewFont
} if
F /F0 0 /256 T /Times-Roman mF =0A=
/F0S2F F0 [47 0 0 -47 0 0 ] mFS=0A=
F0S2F Ji =0A=
390 294 M (This is a test!)[29 23 13 18 12 13 18 12 21 12 13 21 18 14 =
0]xS =0A=
641 294 M ( )S =0A=
LH
(%%[Page: 1]%%) =3D=20
%%PageTrailer
%%Trailer
%%BoundingBox: 18 8 593 784
%%DocumentNeededResources:=20
%%+ font Times-Roman
%%DocumentSuppliedResources:=20
%%+ procset Pscript_WinNT_ErrorHandler 5.0 0
%%+ procset Pscript_FatalError 5.0 0
%%+ procset Pscript_Win_Basic 5.0 0
%%+ procset Pscript_Win_Utils_L2 5.0 0
%%+ procset Pscript_Text 5.0 0
%%+ procset Pscript_Encoding256 5.0 0
%%+ procset Pscript_Win_Euro_L2 5.0 0
Pscript_WinNT_Incr dup /terminate get exec
ehsave restore
%%Pages: 1
(%%[LastPage]%%) =3D=20
%%EOF
=04
------=_NextPart_000_0008_01C20E09.4A0E4960
Content-Type: text/plain; charset=us-ascii
--
Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple
Bug reporting: http://cygwin.com/bugs.html
Documentation: http://cygwin.com/docs.html
FAQ: http://cygwin.com/faq/
------=_NextPart_000_0008_01C20E09.4A0E4960--
- Raw text -