summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/font/writetype0.w
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/font/writetype0.w')
-rw-r--r--Build/source/texk/web2c/luatexdir/font/writetype0.w35
1 files changed, 19 insertions, 16 deletions
diff --git a/Build/source/texk/web2c/luatexdir/font/writetype0.w b/Build/source/texk/web2c/luatexdir/font/writetype0.w
index 945350a1384..d351c6cdeb1 100644
--- a/Build/source/texk/web2c/luatexdir/font/writetype0.w
+++ b/Build/source/texk/web2c/luatexdir/font/writetype0.w
@@ -1,31 +1,31 @@
% writetype0.w
-%
+%
% Copyright 2006-2008 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: writetype0.w 4442 2012-05-25 22:40:34Z hhenkel $"
+ "$URL: http://foundry.supelec.fr/svn/luatex/trunk/source/texk/web2c/luatexdir/font/writetype0.w $";
+
#include "ptexlib.h"
#include "font/writettf.h"
#include "font/writecff.h"
-static const char _svn_version[] =
- "$Id: writetype0.w 3786 2010-08-02 15:25:12Z taco $ "
-"$URL: http://foundry.supelec.fr/svn/luatex/tags/beta-0.66.0/source/texk/web2c/luatexdir/font/writetype0.w $";
-
@ @c
void writetype0(PDF pdf, fd_entry * fd)
{
@@ -48,7 +48,8 @@ void writetype0(PDF pdf, fd_entry * fd)
cur_file_name =
luatex_find_file(fd_cur->fm->ff_name, find_opentype_file_callback);
if (cur_file_name == NULL) {
- pdftex_fail("cannot find OpenType font file for reading (%s)", fd_cur->fm->ff_name);
+ pdftex_fail("cannot find OpenType font file for reading (%s)",
+ fd_cur->fm->ff_name);
}
callback_id = callback_defined(read_opentype_file_callback);
if (callback_id > 0) {
@@ -56,11 +57,13 @@ void writetype0(PDF pdf, fd_entry * fd)
&file_opened, &ttf_buffer, &ttf_size) &&
file_opened && ttf_size > 0) {
} else {
- pdftex_fail("cannot open OpenType font file for reading (%s)", cur_file_name);
+ pdftex_fail("cannot open OpenType font file for reading (%s)",
+ cur_file_name);
}
} else {
if (!otf_open(cur_file_name)) {
- pdftex_fail("cannot open OpenType font file for reading (%s)", cur_file_name);
+ pdftex_fail("cannot open OpenType font file for reading (%s)",
+ cur_file_name);
}
ttf_read_file();
ttf_close();
@@ -93,14 +96,14 @@ void writetype0(PDF pdf, fd_entry * fd)
if (!is_subsetted(fd_cur->fm)) {
/* not subsetted, just do a copy */
for (i = (long) tab->length; i > 0; i--)
- fb_putchar(pdf, (eight_bits) ttf_getnum(1));
+ strbuf_putchar(pdf->fb, (unsigned char) ttf_getnum(1));
} else {
if (cff != NULL) {
if (cff_is_cidfont(cff)) {
write_cid_cff(pdf, cff, fd_cur);
#if 0
- for (i = tab->length; i > 0; i--)
- fb_putchar (ttf_getnum(1));
+ for (i = tab->length; i > 0; i--)
+ strbuf_putchar(pdf->fb, (unsigned char) ttf_getnum(1));
#endif
} else {
write_cff(pdf, cff, fd_cur);
@@ -108,7 +111,7 @@ void writetype0(PDF pdf, fd_entry * fd)
} else {
/* not understood, just do a copy */
for (i = (long) tab->length; i > 0; i--)
- fb_putchar(pdf, (eight_bits) ttf_getnum(1));
+ strbuf_putchar(pdf->fb, (unsigned char) ttf_getnum(1));
}
}
xfree(dir_tab);