Stupid bug: "t" was leaving the y-coordinate on the stack, which confused

[sgt/halibut] / bk_ps.c

diff --git a/bk_ps.c b/bk_ps.c
index 8ae49c4..0f8bc99 100644 (file)
--- 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");