diff options
author | Denis Bitouzé <dbitouze@wanadoo.fr> | 2021-02-25 18:23:07 +0000 |
---|---|---|
committer | Denis Bitouzé <dbitouze@wanadoo.fr> | 2021-02-25 18:23:07 +0000 |
commit | c6101f91d071883b48b1b4b51e5eba0f36d9a78d (patch) | |
tree | 1bf7f5a881d7a4f5c5bf59d0b2821943dd822372 /Build/source/texk/web2c/luatexdir/ptexlib.h | |
parent | 07ee7222e389b0777456b427a55c22d0e6ffd267 (diff) |
French translation for tlmgr updated
git-svn-id: svn://tug.org/texlive/trunk@57912 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/ptexlib.h')
-rw-r--r-- | Build/source/texk/web2c/luatexdir/ptexlib.h | 381 |
1 files changed, 0 insertions, 381 deletions
diff --git a/Build/source/texk/web2c/luatexdir/ptexlib.h b/Build/source/texk/web2c/luatexdir/ptexlib.h deleted file mode 100644 index f63f480b000..00000000000 --- a/Build/source/texk/web2c/luatexdir/ptexlib.h +++ /dev/null @@ -1,381 +0,0 @@ -/* ptexlib.h - - Copyright 1996-2006 Han The Thanh <thanh@pdftex.org> - Copyright 2006-2013 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/>. */ - - -#ifndef PTEXLIB_H -# define PTEXLIB_H - -/* Try to detect if a system header has already been included. */ -#if (defined(__linux__) && defined(_FEATURES_H)) || \ - (defined(_MSC_VER) && (defined(_INC_CRTDEFS) || defined(_OFF_T_DEFINED))) || \ - (defined(__MINGW32__) && defined(__MINGW_H)) -ptexlib.h must be included first!!! -#endif - -#ifdef HAVE_CONFIG_H -#include <w2c/config.h> -#endif - -/* WEB2C macros and prototypes */ -# include "luatex.h" - -# include "lib/lib.h" - -# ifdef _MSC_VER -extern double rint(double x); -# endif - -# if defined(WIN32) || defined(__MINGW32__) || defined(__CYGWIN__) -extern char **suffixlist; /* in luainit.w */ -# endif - -/* Replicate these here. They are hardcoded anyway */ - -# define eTeX_version_string "2.2" /* current \eTeX\ version */ -# define eTeX_version 2 /* \.{\\eTeXversion} */ -# define eTeX_minor_version 2 /* \.{\\eTeXminorversion} */ -# define eTeX_revision ".2" /* \.{\\eTeXrevision} */ - - -#define LUA_COMPAT_MODULE 1 -# include "lua.h" - - -/* pdftexlib macros from ptexmac.h */ - -# ifdef WIN32 -# define inline __inline -# endif - -/**********************************************************************/ -/* Pascal WEB macros */ - -# define max_integer 0x7FFFFFFF -# define max_dimen 0x3FFFFFFF - -/**********************************************************************/ - -# define PRINTF_BUF_SIZE 1024 -# define MAX_CSTRING_LEN 1024 * 1024 -# define MAX_PSTRING_LEN 1024 -# define SMALL_BUF_SIZE 256 -# define SMALL_ARRAY_SIZE 256 - -# define check_buf(size, buf_size) \ - if ((unsigned)(size) > (unsigned)(buf_size)) \ - formatted_error("internal","buffer overflow: %d > %d at file %s, line %d", \ - (int)(size), (int)(buf_size), __FILE__, __LINE__ ) - -# define append_char_to_buf(c, p, buf, buf_size) do { \ - if (c == 9) \ - c = 32; \ - if (c == 13 || c == EOF) \ - c = 10; \ - if (c != ' ' || (p > buf && p[-1] != 32)) { \ - check_buf(p - buf + 1, (buf_size)); \ - *p++ = c; \ - } \ -} while (0) - -# define append_eol(p, buf, buf_size) do { \ - check_buf(p - buf + 2, (buf_size)); \ - if (p - buf > 1 && p[-1] != 10) \ - *p++ = 10; \ - if (p - buf > 2 && p[-2] == 32) { \ - p[-2] = 10; \ - p--; \ - } \ - *p = 0; \ -} while (0) - -# define remove_eol(p, buf) do { \ - p = strend(buf) - 1; \ - if (*p == 10) \ - *p = 0; \ -} while (0) - -# define skip_char(p, c) if (*p == c) p++ - -# define alloc_array(T, n, s) do { \ - if (T##_array == NULL) { \ - T##_limit = (size_t)(s); \ - if ((unsigned)(n) > (unsigned)T##_limit) \ - T##_limit = (size_t)(n); \ - T##_array = xtalloc((unsigned)T##_limit, T##_entry); \ - T##_ptr = T##_array; \ - } \ - else if ((unsigned)(T##_ptr - T##_array + (unsigned)(n)) > (unsigned)(T##_limit)) { \ - size_t last_ptr_index = (size_t)(T##_ptr - T##_array); \ - T##_limit *= 2; \ - if ((unsigned)(T##_ptr - T##_array + (unsigned)(n)) > (unsigned)(T##_limit)) \ - T##_limit = (size_t)(T##_ptr - T##_array + (unsigned)(n)); \ - xretalloc(T##_array, (unsigned)T##_limit, T##_entry); \ - T##_ptr = T##_array + last_ptr_index; \ - } \ - } while (0) - -# define define_array(T) \ -T##_entry *T##_ptr, *T##_array = NULL; \ -size_t T##_limit - -# define xfree(a) do { free(a); a = NULL; } while (0) -# define dxfree(a,b) do { free(a); a = b; } while (0) -# define strend(s) strchr(s, 0) -# define xtalloc XTALLOC -# define xretalloc XRETALLOC - -# define cmp_return(a, b) \ - if ((a) > (b)) \ - return 1; \ - if ((a) < (b)) \ - return -1 - -# define str_prefix(s1, s2) (strncmp((s1), (s2), strlen(s2)) == 0) - -# include "tex/mainbody.h" -# include "tex/expand.h" -# include "tex/conditional.h" - -# include "pdf/pdftypes.h" /* the backend data structure, shared between dvi and pdf (might move to |tex/backend| */ -# include "tex/backend.h" /* more backend data */ - -# include "synctex.h" - -# include "utils/avlstuff.h" -# include "utils/managed-sa.h" - -# include "image/writeimg.h" - -# include "dvi/dvigen.h" - -# include "pdf/pdftables.h" -# include "pdf/pdfpagetree.h" -# include "pdf/pdfgen.h" -# include "pdf/pdfpage.h" -# include "pdf/pdfaction.h" -# include "pdf/pdfannot.h" -# include "pdf/pdfcolorstack.h" -# include "pdf/pdfdest.h" -# include "pdf/pdffont.h" -# include "pdf/pdfglyph.h" -# include "pdf/pdfimage.h" -# include "pdf/pdflink.h" -# include "pdf/pdflistout.h" -# include "pdf/pdfliteral.h" -# include "pdf/pdfobj.h" -# include "pdf/pdfoutline.h" -# include "pdf/pdfrule.h" -# include "pdf/pdfsaverestore.h" -# include "pdf/pdfsetmatrix.h" -# include "pdf/pdfshipout.h" -# include "pdf/pdfthread.h" -# include "pdf/pdfxform.h" - - -# include "font/luatexfont.h" -# include "font/mapfile.h" - -# include "utils/utils.h" -# include "utils/unistring.h" - -# include "image/writejbig2.h" -# include "image/pdftoepdf.h" - -# include "lang/texlang.h" - -# include "tex/textcodes.h" -# include "tex/mathcodes.h" - -# include "tex/align.h" -# include "tex/directions.h" -# include "tex/errors.h" -# include "tex/inputstack.h" -# include "tex/stringpool.h" -# include "tex/textoken.h" -# include "tex/printing.h" -# include "tex/texfileio.h" -# include "tex/arithmetic.h" -# include "tex/nesting.h" -# include "tex/packaging.h" -# include "tex/linebreak.h" -# include "tex/postlinebreak.h" -# include "tex/scanning.h" -# include "tex/buildpage.h" -# include "tex/maincontrol.h" -# include "tex/dumpdata.h" -# include "tex/mainbody.h" -# include "tex/extensions.h" -# include "tex/texnodes.h" - -# include "tex/texmath.h" -# include "tex/mlist.h" -# include "tex/primitive.h" -# include "tex/commands.h" -# include "tex/equivalents.h" - -/**********************************************************************/ - -# include "tex/filename.h" - -/**********************************************************************/ - -extern halfword new_ligkern(halfword head, halfword tail); -extern halfword handle_ligaturing(halfword head, halfword tail); -extern halfword handle_kerning(halfword head, halfword tail); - -halfword lua_hpack_filter( - halfword head_node, scaled size, int pack_type, int extrainfo, int d, halfword a); -void lua_node_filter( - int filterid, int extrainfo, halfword head_node, - halfword * tail_node); -halfword lua_vpack_filter( - halfword head_node, scaled size, int pack_type, scaled maxd, int extrainfo, int d, halfword a); -void lua_node_filter_s( - int filterid, int extrainfo); -int lua_linebreak_callback( - int is_broken, halfword head_node, halfword * new_head); -int lua_appendtovlist_callback( - halfword box, int location, halfword prev_depth, boolean is_mirrored, - halfword * result, int * next_depth, boolean * prev_set); - -void lua_pdf_literal(PDF pdf, int i, int noline); -void copy_pdf_literal(pointer r, pointer p); -void free_pdf_literal(pointer p); -void show_pdf_literal(pointer p); - -void copy_late_lua(pointer r, pointer p); -void copy_user_lua(pointer r, pointer p); -void free_late_lua(pointer p); -void free_user_lua(pointer p); -void show_late_lua(pointer p); - -void load_tex_patterns(int curlang, halfword head); -void load_tex_hyphenation(int curlang, halfword head); - -/* lua/llualib.c */ - -void dump_luac_registers(void); -void undump_luac_registers(void); - -/* lua/ltexlib.c */ -void luacstring_start(int n); -void luacstring_close(int n); -int luacstring_cattable(void); -int luacstring_input(halfword *n); -int luacstring_partial(void); -int luacstring_final_line(void); - -/* lua/luanode.c */ -int visible_last_node_type(int n); -void print_node_mem_stats(void); - -/* lua/limglib.c */ -void vf_out_image(PDF pdf, unsigned i); - -/* lua/ltexiolib.c */ -void flush_loggable_info(void); - -/* lua/luastuff.w */ -void luafunctioncall(int slot); -void luabytecodecall(int slot); - -/* lua/luastuff.c */ -void luatokencall(int p, int nameptr); -extern void late_lua(PDF pdf, halfword p); - -extern void check_texconfig_init(void); - -scaled divide_scaled(scaled s, scaled m, int dd); -scaled divide_scaled_n(double s, double m, double d); - -# include "tex/texdeffont.h" -# include "luatexcallbackids.h" - -extern boolean get_callback(lua_State * L, int i); - -/* Additions to texmfmp.h for pdfTeX */ - -/* mark a char in font */ -# define pdf_mark_char(f,c) set_char_used(f,c,true) - -/* test whether a char in font is marked */ -# define pdf_char_marked char_used - -# define voidcast(a) (void *)(a) -# define fixmemcast(a) (smemory_word *)(a) - -extern void do_vf(internal_font_number tmp_f); - -/* This routine has to return four values. */ -# define dateandtime(i,j,k,l) get_date_and_time (&(i), &(j), &(k), &(l)) -extern void get_date_and_time(int *, int *, int *, int *); - -/* Get high-res time info. */ -# define seconds_and_micros(i,j) get_seconds_and_micros (&(i), &(j)) -extern void get_seconds_and_micros(int *, int *); - -/* This routine has to return a scaled value. */ -extern int getrandomseed(void); - -/* Copy command-line arguments into the buffer, despite the name. */ -extern void topenin(void); - -/* Can't prototype this since it uses poolpointer and ASCIIcode, which - are defined later in mfd.h, and mfd.h uses stuff from here. */ -/* Therefore the department of ugly hacks decided to move this declaration - to the *coerce.h files. */ -/* extern void calledit (); */ - -/* Set an array size from texmf.cnf. */ -/*extern void setupboundvariable(integer *, const_string, integer);*/ - -/* here are a few functions that used to be in coerce.h */ - -extern str_number getjobname(str_number); -extern str_number makefullnamestring(void); - -# include <kpathsea/version.h> - -extern PDF static_pdf; - -extern string normalize_quotes(const_string name, const_string mesg); -extern string dump_name; -extern const_string c_job_name; - -extern halfword *check_isnode(lua_State * L, int i); -extern void lua_nodelib_push_fast(lua_State * L, halfword n); - -extern halfword list_node_mem_usage(void); - -extern halfword *check_isnode(lua_State * L, int ud); - -extern extinfo *get_charinfo_vert_variants(charinfo * ci); -extern extinfo *get_charinfo_hor_variants(charinfo * ci); -extern void set_charinfo_hor_variants(charinfo * ci, extinfo * ext); -extern void set_charinfo_vert_variants(charinfo * ci, extinfo * ext); - -extern extinfo *copy_variants(extinfo * o); - -extern int program_name_set; /* in lkpselib.c */ - -extern int kpse_init; /* in luainit.w */ -extern int kpse_available(const char * m); /* in texfileio.w */ - -#endif /* PTEXLIB_H */ |