Tweak prologue so that it works correctly on interpreters that don't support
authorben <ben@cda61777-01e9-0310-a592-d414129be87e>
Sun, 3 Dec 2006 13:23:55 +0000 (13:23 +0000)
committerben <ben@cda61777-01e9-0310-a592-d414129be87e>
Sun, 3 Dec 2006 13:23:55 +0000 (13:23 +0000)
pdfmark, specifically by having the dummy versions of "p", "x", and "u" pop
their arguments rather than leaving them on the stack to cause trouble.

git-svn-id: svn://svn.tartarus.org/sgt/halibut@6956 cda61777-01e9-0310-a592-d414129be87e

bk_ps.c

diff --git a/bk_ps.c b/bk_ps.c
index 35fe582..261a22c 100644 (file)
--- a/bk_ps.c
+++ b/bk_ps.c
@@ -114,7 +114,9 @@ void ps_backend(paragraph *sourceform, keywordlist *keywords,
            "       [ /Action 3 -1 roll /Rect 5 -1 roll /Border [0 0 0 0]\n"
            "       /Subtype /Link /ANN pdfmark } bind def\n"
            "} {\n"
-           "  [/p /x /u] { null cvx def } forall\n"
+           "  /p { pop } bind def\n"
+           "  /x { pop pop } bind def\n"
+           "  /u /x load def\n"
            "} ifelse\n");
 
     fprintf(fp, "%%%%EndResource\n");