PostScript utilities

[Angus Duggan]

In article <8545 at skye.cs.ed.ac.uk>, ajcd at cs.edinburgh.ac.uk (me) writes:
> People seem to have been asking for programs to perform page manipulation for
> PostScript recently; here's my set of utilities for selecting and rearranging
> pages from PostScript documents.
> 
> #! /bin/sh
...

This always happens to me; post something, then instantly start finding stupid
bugs. I copied some stuff from the red book incorrectly, here's a patch:

*** pstops.c.~1~	Wed Feb 20 14:06:57 1991
--- pstops.c	Tue Apr  9 16:57:44 1991
***************
*** 296,302 ****
     }
     writestring("/initgraphics{initmatrix newpath initclip 1 setlinewidth\n");
     writestring(" 0 setlinecap 0 setlinejoin []0 setdash 0 setgray\n");
!    writestring(" 0 setmiterlimit}bind def\n");
     if (nobinding) /* desperation measures */
        writestring("/bind{}def\n");
     writestring("%%EndProcSet\n");
--- 296,302 ----
     }
     writestring("/initgraphics{initmatrix newpath initclip 1 setlinewidth\n");
     writestring(" 0 setlinecap 0 setlinejoin []0 setdash 0 setgray\n");
!    writestring(" 10 setmiterlimit}bind def\n");
     if (nobinding) /* desperation measures */
        writestring("/bind{}def\n");
     writestring("%%EndProcSet\n");

a.
-- 
Angus Duggan, Department of Computer Science,	| I'm pink, therefore I'm Spam.
University of Edinburgh, JCMB,			| JANET:  ajcd at uk.ac.ed.lfcs
The King's Buildings, Mayfield Road,		| VOICE:  (UK) 031 650 5126
Edinburgh, EH9 3JZ, Scotland.	| OR:  ajcd%lfcs.ed.ac.uk at nsfnet-relay.ac.uk