github.com/Interlisp.medley
1
0
Fork 0
mirror of synced 2026-02-17 13:27:20 +00:00
Code Issues Projects Releases Wiki Activity

Hardcopy to printer (#2290)

Browse Source 
* Separate interface for imagefile creation from the send-to-printer interface
* SEND.FILE.TO.PRINTER recognizes :DEFAULTPRINTER
* Various changes to address #2414
* Move BITMAP properties from PRINTERTYPES to PRINTFILETYPES.
* Fix ShellOpen, add UNIX-TMP-FILE-NAME
* Include COERCEFONTSPEC changes in anticipation of HTML streams
* PDFSTREAM compatible with new imagefile architecture plus able to convert non-local Postscript streams
* SKETCH compatible with new imagefile/printing architecture
* TEDIT compatible with new printing architecture
* Tedit files are of type TEDIT, not TEXT, new interface function TEDIT.TO.IMAGEFILE
* ATTACHEDWINDOW:  DOATTACHEDWINDOWCOM allows menu to have a form to EVAL, like the background menu
* WINDOW: fix menus for new hardcopy architecture
* Remove FLUSHFONTSINCORE--FLUSHFONTCACHE is more general
* LOAD character names as suggested in PR #2398
* HARDCOPYW respects file extension
* VIEWER as default printinghost
* SLASHIT interprets '.
* MCCS to UTF8 conversion on printer name
* Deal with {LPT}.LOCAL and upper casing
* @ LPT printers work with exact upper/lower matching
* Using NSPRINT functions to recognize fax
* Let "UNIX" be the name of the default printer of type UNIX
This commit is contained in:
rmkaplan
2026-01-26 15:38:22 -08:00
committed by GitHub
parent 23cef354eb
commit 65df2ba6a4
63 changed files with 3435 additions and 3177 deletions
Download Patch File Download Diff File Expand all files Collapse all files

159
library/POSTSCRIPTSTREAM
View File

@@ -1,12 +1,13 @@
(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10)
(FILECREATED "13-Oct-2025 18:05:08" {WMEDLEY}<library>POSTSCRIPTSTREAM.;55 260304
(FILECREATED "19-Jan-2026 17:04:42" {WMEDLEY}<library>POSTSCRIPTSTREAM.;64 258252
:EDIT-BY rmk
:CHANGES-TO (FNS POSTSCRIPT.FONTCREATE)
:CHANGES-TO (FNS OPENPOSTSCRIPTSTREAM)
(VARS POSTSCRIPTSTREAMCOMS)
:PREVIOUS-DATE " 9-Oct-2025 21:16:27" {WMEDLEY}<library>POSTSCRIPTSTREAM.;53)
:PREVIOUS-DATE "31-Dec-2025 22:38:51" {WMEDLEY}<library>POSTSCRIPTSTREAM.;62)
(PRETTYCOMPRINT POSTSCRIPTSTREAMCOMS)
@@ -45,7 +46,7 @@
POSTSCRIPT.FONTSAVAILABLE POSTSCRIPT.FONTEXISTS?)
(FNS OPENPOSTSCRIPTSTREAM CLOSEPOSTSCRIPTSTREAM)
(INITVARS (*POSTSCRIPT-FILE-TYPE* 'BINARY))
(FNS POSTSCRIPT.HARDCOPYW POSTSCRIPT.TEDIT POSTSCRIPT.TEXT POSTSCRIPTFILEP MAKEEPSFILE)
(FNS POSTSCRIPT.HARDCOPYW POSTSCRIPT.TEDIT POSTSCRIPTFILEP MAKEEPSFILE)
(FNS POSTSCRIPT.BITMAPSCALE POSTSCRIPT.CLOSESTRING POSTSCRIPT.ENDPAGE POSTSCRIPT.OUTSTR
POSTSCRIPT.PUTBITMAPBYTES POSTSCRIPT.PUTCOMMAND POSTSCRIPT.SET-FAKE-LANDSCAPE
POSTSCRIPT.SHOWACCUM POSTSCRIPT.STARTPAGE \POSTSCRIPTTAB \PS.BOUTFIXP \PS.SCALEHACK
@@ -154,17 +155,9 @@
(OPTIMA (PALATINO 1))
(TITAN (COURIER 1))
(* (* 1]
(POSTSCRIPTCHARCOERCIONS NIL)
(\POSTSCRIPT.MAX.WILD.FONTSIZE 72))
[COMS (FNS POSTSCRIPTSEND)
(ADDVARS (PRINTERTYPES ((POSTSCRIPT)
(CANPRINT (POSTSCRIPT))
(STATUS TRUE)
(PROPERTIES NILL)
(SEND POSTSCRIPTSEND)
(BITMAPSCALE POSTSCRIPT.BITMAPSCALE)
(BITMAPFILE (POSTSCRIPT.HARDCOPYW FILE BITMAP SCALEFACTOR
REGION ROTATION TITLE]
[ADDVARS (POSTSCRIPT.FONT.ALIST (HELVETICA . HELVETICA)
(ADDVARS (POSTSCRIPT.FONT.ALIST (HELVETICA . HELVETICA)
(HELVETICAD . HELVETICA)
(TIMESROMAN . TIMES)
(TIMESROMAND . TIMES)
@@ -176,15 +169,9 @@
(TERMINAL . COURIER)
(LOGO . HELVETICA)
(OPTIMA . PALATINO)
(TITAN . COURIER))
[PRINTFILETYPES (POSTSCRIPT (TEST POSTSCRIPTFILEP)
(EXTENSION (PS PSC PSF))
(CONVERSION (TEXT POSTSCRIPT.TEXT TEDIT TEDIT.TO.IMAGEFILE]
(IMAGESTREAMTYPES (POSTSCRIPT (OPENSTREAM OPENPOSTSCRIPTSTREAM)
(FONTCREATE POSTSCRIPT.FONTCREATE)
(FONTSAVAILABLE POSTSCRIPT.FONTSAVAILABLE)
(CREATECHARSET \CREATECHARSET.PSC)
(FONTEXISTS? POSTSCRIPT.FONTEXISTS?]
(TITAN . COURIER)))
(ALISTS (PRINTFILETYPES POSTSCRIPT)
(IMAGESTREAMTYPES POSTSCRIPT))
(INITVARS (POSTSCRIPT.PAGETYPE 'LETTER))
(* ;; "NIL means initial clipping is same as paper size. Don't know why the other regions were specified--rmk")
@@ -389,7 +376,8 @@
(DEFINEQ
(POSTSCRIPT.INIT
[LAMBDA NIL (* ; "Edited 9-Sep-2025 21:57 by rmk")
[LAMBDA NIL (* ; "Edited 31-Dec-2025 22:38 by rmk")
(* ; "Edited 9-Sep-2025 21:57 by rmk")
(* ; "Edited 22-Aug-2025 21:34 by rmk")
(* ; "Edited 14-May-2018 10:48 by rmk:")
(* ; "Edited 4-Feb-93 21:08 by jds")
@@ -436,7 +424,7 @@
(* ;; "Eliminate any existing postscript fonts, to start with a clean slate if reinitializing.")
(FLUSHFONTSINCORE '* '* '* '* 'POSTSCRIPT)
(FLUSHFONTCACHE NIL '* '* '* '* 'POSTSCRIPT)
(SETQ POSTSCRIPTFONTCACHE NIL)
(SETQ \POSTSCRIPT.CHARTYPE (CL:MAKE-ARRAY 256 :INITIAL-ELEMENT T))
@@ -1127,13 +1115,14 @@
NEWWIDTHS)])
(POSTSCRIPT.FONTSAVAILABLE
[LAMBDA (FONTSPEC) (* ; "Edited 25-Aug-2025 13:09 by rmk")
[LAMBDA (FONTSPEC) (* ; "Edited 17-Dec-2025 20:55 by rmk")
(* ; "Edited 25-Aug-2025 13:09 by rmk")
(* ; "Edited 23-Aug-2025 08:19 by rmk")
(* ;; "Postscript only has font files of size 1, and only files for %"raw%" postscript families that Medley font families are mapped to by POSTSCRIPTFONTCOERCIONS. Therefore the search doesn't care about the given family, just looks at the corresponding raw files that exist in the directory. ")
(LET [(SIZE (fetch (FONTSPEC FSSIZE) of FONTSPEC))
(FONTSAVAILABLE (\SEARCHFONTFILES (CAR (COERCEFONTSPEC FONTSPEC]
(FONTSAVAILABLE (\SEARCHFONTFILES (COERCEFONTSPEC FONTSPEC]
(* ;; "Switch from postscript family names back to the corresponding Medley names.")
@@ -1186,7 +1175,8 @@
(DEFINEQ
(OPENPOSTSCRIPTSTREAM
[LAMBDA (FILE OPTIONS) (* ; "Edited 19-Sep-2025 16:02 by rmk")
[LAMBDA (FILE OPTIONS) (* ; "Edited 19-Jan-2026 17:04 by rmk")
(* ; "Edited 19-Sep-2025 16:02 by rmk")
(* ; "Edited 14-Sep-2025 12:50 by rmk")
(* ; "Edited 12-Jun-2021 19:14 by rmk:")
(* ;
@@ -1278,7 +1268,8 @@
(* ;; "If a REGION parameter was supplied, it establishes the initial margins.")
(SETQ REG (OR (AND (SETQ REG (LISTGET OPTIONS 'REGION))
(SETQ REG (OR (AND (SETQ REG (OR (LISTGET OPTIONS 'REGION)
POSTSCRIPT.DEFAULT.PAGEREGION))
(INTERSECTREGIONS REG CLIP))
(CREATEREGION 3600 3600 54000 72000)))
(replace (\POSTSCRIPTDATA POSTSCRIPTLEFTMARGIN) of IMAGEDATA with (fetch (REGION LEFT)
@@ -1399,14 +1390,6 @@
(TEDIT.TO.IMAGESTREAM FILE IMAGESTREAM])
(POSTSCRIPT.TEXT
[LAMBDA (FILE IMAGEFILE IMAGETYPE OPTIONS) (* ; "Edited 17-Sep-2025 23:21 by rmk")
(* ; "Edited 23-Apr-89 11:31 by TAL")
(TEXTTOIMAGEFILE FILE IMAGEFILE IMAGETYPE `(,@OPTIONS REGION ,POSTSCRIPT.DEFAULT.PAGEREGION
ROTATION ,(NOT (NOT
POSTSCRIPT.TEXTFILE.LANDSCAPE
])
(POSTSCRIPTFILEP
[LAMBDA (FILE) (* ; "Edited 9-Oct-2025 21:16 by rmk")
(* ; "Edited 18-Sep-2025 09:35 by rmk")
@@ -1432,7 +1415,8 @@
(CHARCODE !])])
(MAKEEPSFILE
[LAMBDA (IMAGEOBJ FILENAME) (* ; "Edited 16-Sep-2025 00:29 by rmk")
[LAMBDA (IMAGEOBJ FILENAME) (* ; "Edited 7-Dec-2025 16:37 by rmk")
(* ; "Edited 16-Sep-2025 00:29 by rmk")
(* ; "Edited 7-Apr-94 14:48 by rmk:")
(* ;; "Puts IMAGEOBJ on a 1-page encapsulated postscript file. The lower-left corner of the image box will be at 0,0 on the page.")
@@ -1441,7 +1425,7 @@
(LET ([IMAGEBOX (APPLY* (IMAGEOBJPROP IMAGEOBJ 'IMAGEBOXFN)
IMAGEOBJ
(OPENIMAGESTREAM `{NODIRCORE}SCRATCH 'POSTSCRIPT]
(OPENIMAGESTREAM NIL 'POSTSCRIPT]
STREAM)
[SETQ STREAM (OPENIMAGESTREAM FILENAME 'POSTSCRIPT
`(BOUNDINGBOX (0 0 ,(FETCH XSIZE OF IMAGEBOX)
@@ -4335,28 +4319,9 @@
(TITAN (COURIER 1))
(* (* 1))))
(RPAQ? POSTSCRIPTCHARCOERCIONS NIL)
(RPAQ? \POSTSCRIPT.MAX.WILD.FONTSIZE 72)
(DEFINEQ
(POSTSCRIPTSEND
[LAMBDA (HOST FILE PRINTOPTIONS) (* ; "Edited 20-Nov-95 11:29 by ")
(* ; "Edited 20-Nov-95 11:26 by ")
(* ;; "This is the send function for generic POSTSCRIPT printers. It branches on the architecture-specific function. The theory is that the send method is really a property of the operating system, not a property of specific postscript printers. These functions are contained in separate library files (or defined by user).")
(SELECTQ (MKATOM (UNIX-GETPARM "ARCH"))
(dos (DOSPRINT HOST FILE PRINTOPTIONS))
(UnixPrint HOST FILE PRINTOPTIONS])
)
(ADDTOVAR PRINTERTYPES ((POSTSCRIPT)
(CANPRINT (POSTSCRIPT))
(STATUS TRUE)
(PROPERTIES NILL)
(SEND POSTSCRIPTSEND)
(BITMAPSCALE POSTSCRIPT.BITMAPSCALE)
(BITMAPFILE (POSTSCRIPT.HARDCOPYW FILE BITMAP SCALEFACTOR REGION ROTATION
TITLE))))
(ADDTOVAR POSTSCRIPT.FONT.ALIST (HELVETICA . HELVETICA)
(HELVETICAD . HELVETICA)
@@ -4373,8 +4338,10 @@
(TITAN . COURIER))
(ADDTOVAR PRINTFILETYPES (POSTSCRIPT (TEST POSTSCRIPTFILEP)
(EXTENSION (PS PSC PSF))
(CONVERSION (TEXT POSTSCRIPT.TEXT TEDIT TEDIT.TO.IMAGEFILE))))
(EXTENSION (PS PSC PSF POSTSCRIPT))
(BITMAPSCALE POSTSCRIPT.BITMAPSCALE)
(BITMAPFILE (POSTSCRIPT.HARDCOPYW IMAGEFILE BITMAP SCALEFACTOR REGION
ROTATION TITLE))))
(ADDTOVAR IMAGESTREAMTYPES (POSTSCRIPT (OPENSTREAM OPENPOSTSCRIPTSTREAM)
(FONTCREATE POSTSCRIPT.FONTCREATE)
@@ -4424,39 +4391,37 @@
(ADDTOVAR LAMA POSTSCRIPT.PUTCOMMAND)
)
(DECLARE%: DONTCOPY
(FILEMAP (NIL (23388 33596 (POSTSCRIPT.INIT 23398 . 30202) (POSTSCRIPT.PUTRGBCOLOR 30204 . 31226) (
\PSC.COLOR.TO.RGB 31228 . 33594)) (34582 69900 (PSCFONT.READFONT 34592 . 36500) (PSCFONT.SPELLFILE
36502 . 37315) (PSCFONT.COERCEFILE 37317 . 38889) (PSCFONTFROMCACHE.SPELLFILE 38891 . 39876) (
PSCFONTFROMCACHE.COERCEFILE 39878 . 41530) (PSCFONT.WRITEFONT 41532 . 42547) (READ-AFM-FILE 42549 .
48420) (CONVERT-AFM-FILES 48422 . 49634) (POSTSCRIPT.GETFONTID 49636 . 51031) (POSTSCRIPT.FONTCREATE
51033 . 63927) (\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS 63929 . 66326) (POSTSCRIPT.FONTSAVAILABLE 66328
. 68511) (POSTSCRIPT.FONTEXISTS? 68513 . 69898)) (69901 79624 (OPENPOSTSCRIPTSTREAM 69911 . 79290) (
CLOSEPOSTSCRIPTSTREAM 79292 . 79622)) (79669 86491 (POSTSCRIPT.HARDCOPYW 79679 . 82786) (
POSTSCRIPT.TEDIT 82788 . 83240) (POSTSCRIPT.TEXT 83242 . 83829) (POSTSCRIPTFILEP 83831 . 85319) (
MAKEEPSFILE 85321 . 86489)) (86492 130066 (POSTSCRIPT.BITMAPSCALE 86502 . 88958) (
POSTSCRIPT.CLOSESTRING 88960 . 89513) (POSTSCRIPT.ENDPAGE 89515 . 90406) (POSTSCRIPT.OUTSTR 90408 .
91625) (POSTSCRIPT.PUTBITMAPBYTES 91627 . 100098) (POSTSCRIPT.PUTCOMMAND 100100 . 101089) (
POSTSCRIPT.SET-FAKE-LANDSCAPE 101091 . 105611) (POSTSCRIPT.SHOWACCUM 105613 . 107768) (
POSTSCRIPT.STARTPAGE 107770 . 110302) (\POSTSCRIPTTAB 110304 . 111101) (\PS.BOUTFIXP 111103 . 112383)
(\PS.SCALEHACK 112385 . 115028) (\PS.SCALEREGION 115030 . 115590) (\SCALEDBITBLT.PSC 115592 . 119902)
(\SETPOS.PSC 119904 . 120385) (\SETXFORM.PSC 120387 . 122971) (\STRINGWIDTH.PSC 122973 . 123446) (
\SWITCHFONTS.PSC 123448 . 128940) (\TERPRI.PSC 128942 . 130064)) (130101 183957 (\BITBLT.PSC 130111 .
130663) (\BLTSHADE.PSC 130665 . 135326) (\CHARWIDTH.PSC 135328 . 135835) (\CREATECHARSET.PSC 135837 .
137193) (\DRAWARC.PSC 137195 . 139573) (\DRAWCIRCLE.PSC 139575 . 141826) (\DRAWCURVE.PSC 141828 .
145672) (\DRAWELLIPSE.PSC 145674 . 148038) (\DRAWLINE.PSC 148040 . 150780) (\DRAWPOINT.PSC 150782 .
151358) (\DRAWPOLYGON.PSC 151360 . 154489) (\DSPBOTTOMMARGIN.PSC 154491 . 155178) (
\DSPCLIPPINGREGION.PSC 155180 . 156555) (\DSPCOLOR.PSC 156557 . 157488) (\DSPFONT.PSC 157490 . 161127)
(\DSPLEFTMARGIN.PSC 161129 . 161815) (\DSPLINEFEED.PSC 161817 . 162407) (\DSPPUSHSTATE.PSC 162409 .
163869) (\DSPPOPSTATE.PSC 163871 . 167356) (\DSPRESET.PSC 167358 . 168023) (\DSPRIGHTMARGIN.PSC 168025
. 168714) (\DSPROTATE.PSC 168716 . 169715) (\DSPSCALE.PSC 169717 . 170669) (\DSPSCALE2.PSC 170671 .
171511) (\DSPSPACEFACTOR.PSC 171513 . 172434) (\DSPTOPMARGIN.PSC 172436 . 173007) (\DSPTRANSLATE.PSC
173009 . 175040) (\DSPXPOSITION.PSC 175042 . 175606) (\DSPYPOSITION.PSC 175608 . 176199) (
\FILLCIRCLE.PSC 176201 . 178426) (\FILLPOLYGON.PSC 178428 . 181665) (\FIXLINELENGTH.PSC 181667 .
182986) (\MOVETO.PSC 182988 . 183758) (\NEWPAGE.PSC 183760 . 183955)) (184013 206159 (
\POSTSCRIPT.CHANGECHARSET 184023 . 184741) (\POSTSCRIPT.OUTCHARFN 184743 . 197013) (
\POSTSCRIPT.PRINTSLUG 197015 . 198739) (\POSTSCRIPT.SPECIALOUTCHARFN 198741 . 201092) (\UPDATE.PSC
201094 . 202340) (\POSTSCRIPT.ACCENTFN 202342 . 203284) (\POSTSCRIPT.ACCENTPAIR 203286 . 206157)) (
206257 207902 (\PSC.SPACEDISP 206267 . 206546) (\PSC.SPACEWID 206548 . 207167) (\PSC.SYMBOLS 207169 .
207900)) (208011 211002 (\POSTSCRIPT.NSHASH 208021 . 211000)) (256412 257118 (POSTSCRIPTSEND 256422 .
257116)))))
(FILEMAP (NIL (22369 32688 (POSTSCRIPT.INIT 22379 . 29294) (POSTSCRIPT.PUTRGBCOLOR 29296 . 30318) (
\PSC.COLOR.TO.RGB 30320 . 32686)) (33674 69096 (PSCFONT.READFONT 33684 . 35592) (PSCFONT.SPELLFILE
35594 . 36407) (PSCFONT.COERCEFILE 36409 . 37981) (PSCFONTFROMCACHE.SPELLFILE 37983 . 38968) (
PSCFONTFROMCACHE.COERCEFILE 38970 . 40622) (PSCFONT.WRITEFONT 40624 . 41639) (READ-AFM-FILE 41641 .
47512) (CONVERT-AFM-FILES 47514 . 48726) (POSTSCRIPT.GETFONTID 48728 . 50123) (POSTSCRIPT.FONTCREATE
50125 . 63019) (\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS 63021 . 65418) (POSTSCRIPT.FONTSAVAILABLE 65420
. 67707) (POSTSCRIPT.FONTEXISTS? 67709 . 69094)) (69097 79006 (OPENPOSTSCRIPTSTREAM 69107 . 78672) (
CLOSEPOSTSCRIPTSTREAM 78674 . 79004)) (79051 85377 (POSTSCRIPT.HARDCOPYW 79061 . 82168) (
POSTSCRIPT.TEDIT 82170 . 82622) (POSTSCRIPTFILEP 82624 . 84112) (MAKEEPSFILE 84114 . 85375)) (85378
128952 (POSTSCRIPT.BITMAPSCALE 85388 . 87844) (POSTSCRIPT.CLOSESTRING 87846 . 88399) (
POSTSCRIPT.ENDPAGE 88401 . 89292) (POSTSCRIPT.OUTSTR 89294 . 90511) (POSTSCRIPT.PUTBITMAPBYTES 90513
. 98984) (POSTSCRIPT.PUTCOMMAND 98986 . 99975) (POSTSCRIPT.SET-FAKE-LANDSCAPE 99977 . 104497) (
POSTSCRIPT.SHOWACCUM 104499 . 106654) (POSTSCRIPT.STARTPAGE 106656 . 109188) (\POSTSCRIPTTAB 109190 .
109987) (\PS.BOUTFIXP 109989 . 111269) (\PS.SCALEHACK 111271 . 113914) (\PS.SCALEREGION 113916 .
114476) (\SCALEDBITBLT.PSC 114478 . 118788) (\SETPOS.PSC 118790 . 119271) (\SETXFORM.PSC 119273 .
121857) (\STRINGWIDTH.PSC 121859 . 122332) (\SWITCHFONTS.PSC 122334 . 127826) (\TERPRI.PSC 127828 .
128950)) (128987 182843 (\BITBLT.PSC 128997 . 129549) (\BLTSHADE.PSC 129551 . 134212) (\CHARWIDTH.PSC
134214 . 134721) (\CREATECHARSET.PSC 134723 . 136079) (\DRAWARC.PSC 136081 . 138459) (\DRAWCIRCLE.PSC
138461 . 140712) (\DRAWCURVE.PSC 140714 . 144558) (\DRAWELLIPSE.PSC 144560 . 146924) (\DRAWLINE.PSC
146926 . 149666) (\DRAWPOINT.PSC 149668 . 150244) (\DRAWPOLYGON.PSC 150246 . 153375) (
\DSPBOTTOMMARGIN.PSC 153377 . 154064) (\DSPCLIPPINGREGION.PSC 154066 . 155441) (\DSPCOLOR.PSC 155443
. 156374) (\DSPFONT.PSC 156376 . 160013) (\DSPLEFTMARGIN.PSC 160015 . 160701) (\DSPLINEFEED.PSC
160703 . 161293) (\DSPPUSHSTATE.PSC 161295 . 162755) (\DSPPOPSTATE.PSC 162757 . 166242) (\DSPRESET.PSC
166244 . 166909) (\DSPRIGHTMARGIN.PSC 166911 . 167600) (\DSPROTATE.PSC 167602 . 168601) (
\DSPSCALE.PSC 168603 . 169555) (\DSPSCALE2.PSC 169557 . 170397) (\DSPSPACEFACTOR.PSC 170399 . 171320)
(\DSPTOPMARGIN.PSC 171322 . 171893) (\DSPTRANSLATE.PSC 171895 . 173926) (\DSPXPOSITION.PSC 173928 .
174492) (\DSPYPOSITION.PSC 174494 . 175085) (\FILLCIRCLE.PSC 175087 . 177312) (\FILLPOLYGON.PSC 177314
. 180551) (\FIXLINELENGTH.PSC 180553 . 181872) (\MOVETO.PSC 181874 . 182644) (\NEWPAGE.PSC 182646 .
182841)) (182899 205045 (\POSTSCRIPT.CHANGECHARSET 182909 . 183627) (\POSTSCRIPT.OUTCHARFN 183629 .
195899) (\POSTSCRIPT.PRINTSLUG 195901 . 197625) (\POSTSCRIPT.SPECIALOUTCHARFN 197627 . 199978) (
\UPDATE.PSC 199980 . 201226) (\POSTSCRIPT.ACCENTFN 201228 . 202170) (\POSTSCRIPT.ACCENTPAIR 202172 .
205043)) (205143 206788 (\PSC.SPACEDISP 205153 . 205432) (\PSC.SPACEWID 205434 . 206053) (\PSC.SYMBOLS
206055 . 206786)) (206897 209888 (\POSTSCRIPT.NSHASH 206907 . 209886)))))
STOP