diff options
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/pdf/pdfrule.w')
-rw-r--r-- | Build/source/texk/web2c/luatexdir/pdf/pdfrule.w | 42 |
1 files changed, 19 insertions, 23 deletions
diff --git a/Build/source/texk/web2c/luatexdir/pdf/pdfrule.w b/Build/source/texk/web2c/luatexdir/pdf/pdfrule.w index 4b70e9cfa31..3f10c8c9ada 100644 --- a/Build/source/texk/web2c/luatexdir/pdf/pdfrule.w +++ b/Build/source/texk/web2c/luatexdir/pdf/pdfrule.w @@ -1,34 +1,30 @@ % pdfrule.w -% -% Copyright 2010 Taco Hoekwater <taco@@luatex.org> - +% +% Copyright 2010-2011 Taco Hoekwater <taco@@luatex.org> +% % This file is part of LuaTeX. - +% % LuaTeX is free software; you can redistribute it and/or modify it under % the terms of the GNU General Public License as published by the Free % Software Foundation; either version 2 of the License, or (at your % option) any later version. - +% % LuaTeX is distributed in the hope that it will be useful, but WITHOUT % ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or % FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public % License for more details. - +% % You should have received a copy of the GNU General Public License along % with LuaTeX; if not, see <http://www.gnu.org/licenses/>. @ @c static const char _svn_version[] = - "$Id: pdfrule.w 3584 2010-04-02 17:45:55Z hhenkel $" - "$URL: http://foundry.supelec.fr/svn/luatex/tags/beta-0.66.0/source/texk/web2c/luatexdir/pdf/pdfrule.w $"; + "$Id: pdfrule.w 4442 2012-05-25 22:40:34Z hhenkel $" + "$URL: http://foundry.supelec.fr/svn/luatex/trunk/source/texk/web2c/luatexdir/pdf/pdfrule.w $"; #include "ptexlib.h" - -@ @c #include "pdf/pdfpage.h" -#define lround(a) (long) floor((a) + 0.5) - @ @c void pdf_place_rule(PDF pdf, halfword q, scaledpos size) { @@ -41,30 +37,30 @@ void pdf_place_rule(PDF pdf, halfword q, scaledpos size) dim.h.e = p->pdf.h.e; dim.v.m = lround(size.v * p->k1); dim.v.e = p->pdf.v.e; - pdf_printf(pdf, "q\n"); + pdf_puts(pdf, "q\n"); if (size.v <= one_bp) { pos.v += (int) lround(0.5 * size.v); pdf_set_pos_temp(pdf, pos); - pdf_printf(pdf, "[]0 d 0 J "); + pdf_puts(pdf, "[]0 d 0 J "); print_pdffloat(pdf, dim.v); - pdf_printf(pdf, " w 0 0 m "); + pdf_puts(pdf, " w 0 0 m "); print_pdffloat(pdf, dim.h); - pdf_printf(pdf, " 0 l S\n"); + pdf_puts(pdf, " 0 l S\n"); } else if (size.h <= one_bp) { pos.h += (int) lround(0.5 * size.h); pdf_set_pos_temp(pdf, pos); - pdf_printf(pdf, "[]0 d 0 J "); + pdf_puts(pdf, "[]0 d 0 J "); print_pdffloat(pdf, dim.h); - pdf_printf(pdf, " w 0 0 m 0 "); + pdf_puts(pdf, " w 0 0 m 0 "); print_pdffloat(pdf, dim.v); - pdf_printf(pdf, " l S\n"); + pdf_puts(pdf, " l S\n"); } else { pdf_set_pos_temp(pdf, pos); - pdf_printf(pdf, "0 0 "); + pdf_puts(pdf, "0 0 "); print_pdffloat(pdf, dim.h); - pdf_printf(pdf, " "); + pdf_out(pdf, ' '); print_pdffloat(pdf, dim.v); - pdf_printf(pdf, " re f\n"); + pdf_puts(pdf, " re f\n"); } - pdf_printf(pdf, "Q\n"); + pdf_puts(pdf, "Q\n"); } |