| Date: Tue, 4 Jan 2005 22:31:35 +0000
forgot this
Diffstat:
A src/cmd/page/pdfprolog.ps | 29 +++++++++++++++++++++++++++++
1 file changed, 29 insertions(+), 0 deletions(-)
--- |
| t@@ -0,0 +1,29 @@
+/Page null def
+/Page# 0 def
+/PDFSave null def
+/DSCPageCount 0 def
+/DoPDFPage {dup /Page# exch store pdfgetpage mypdfshowpage } def
+
+/pdfshowpage_mysetpage { % pdfshowpage_mysetpage
+ dup /CropBox pget {
+ boxrect
+ 2 array astore /PageSize exch 4 2 roll
+ neg exch neg exch 2 array astore /PageOffset exch
+ << 5 1 roll >> setpagedevice
+ } if
+} bind def
+
+/mypdfshowpage % pdfshowpage -
+ { dup /Page exch store
+ pdfshowpage_init
+ pdfshowpage_setpage
+ pdfshowpage_mysetpage
+ save /PDFSave exch store
+ (before exec) VMDEBUG
+ pdfshowpage_finish
+ (after exec) VMDEBUG
+ PDFSave restore
+ } bind def
+
+GS_PDF_ProcSet begin
+pdfdict begin |