[cairo-commit] src/cairo-ps-surface.c
Chris Wilson
ickle at kemper.freedesktop.org
Wed Sep 17 11:11:09 PDT 2008
src/cairo-ps-surface.c | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
New commits:
commit dbb692325b328011f2202fced750cc785edb82da
Author: Chris Wilson <chris at chris-wilson.co.uk>
Date: Wed Sep 17 19:09:16 2008 +0100
[ps] Consume dictionary after where.
where either pushes 'dict true' or 'false' so the true procedure needs to
consume the dictionary as well - for our purposes we just pop it off the
operand stack.
diff --git a/src/cairo-ps-surface.c b/src/cairo-ps-surface.c
index 6bf16df..282188a 100644
--- a/src/cairo-ps-surface.c
+++ b/src/cairo-ps-surface.c
@@ -211,12 +211,12 @@ _cairo_ps_surface_emit_header (cairo_ps_surface_t *surface)
"/cairo_selectfont { cairo_font_matrix aload pop pop pop 0 0 6 array astore\n"
" cairo_font exch selectfont cairo_point_x cairo_point_y moveto } bind def\n"
"/Tf { pop /cairo_font exch def /cairo_font_matrix where\n"
- " { cairo_selectfont } if } bind def\n"
+ " { pop cairo_selectfont } if } bind def\n"
"/Td { matrix translate cairo_font_matrix matrix concatmatrix dup\n"
" /cairo_font_matrix exch def dup 4 get exch 5 get cairo_store_point\n"
- " /cairo_font where { cairo_selectfont } if } bind def\n"
+ " /cairo_font where { pop cairo_selectfont } if } bind def\n"
"/Tm { 2 copy 8 2 roll 6 array astore /cairo_font_matrix exch def\n"
- " cairo_store_point /cairo_font where { cairo_selectfont } if } bind def\n"
+ " cairo_store_point /cairo_font where { pop cairo_selectfont } if } bind def\n"
"/g { setgray } bind def\n"
"/rg { setrgbcolor } bind def\n"
"/d1 { setcachedevice } bind def\n");
More information about the cairo-commit
mailing list