From: ben <ben@cda61777-01e9-0310-a592-d414129be87e>
Date: Tue, 21 Sep 2004 19:00:43 +0000 (+0000)
Subject: Stupid bug: "t" was leaving the y-coordinate on the stack, which confused
X-Git-Url: https://git.distorted.org.uk/~mdw/sgt/halibut/commitdiff_plain/ac71b3f5f790b70c3f4b9fe0afc952b131f56fc5

Stupid bug: "t" was leaving the y-coordinate on the stack, which confused
"restore".  Quite how GhostScript managed not to give an error on this I
don't know.


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

diff --git a/bk_ps.c b/bk_ps.c
index 8ae49c4..0f8bc99 100644
--- a/bk_ps.c
+++ b/bk_ps.c
@@ -80,7 +80,7 @@ void ps_backend(paragraph *sourceform, keywordlist *keywords,
 	    "  /integertype /realtype load def\n"
 	    "  /stringtype {show} bind def\n"
 	    "end def\n"
-	    "/t { tdict begin {dup type exec} forall end } bind def\n");
+	    "/t { tdict begin {dup type exec} forall end pop } bind def\n");
 
     fprintf(fp, "%%%%EndResource\n");
     fprintf(fp, "%%%%EndProlog\n");