texlive[46633] Build/source/texk/web2c/luatexdir: code clean up;

[commits+lscarso at tug.org]

Revision: 46633
          http://tug.org/svn/texlive?view=revision&revision=46633
Author:   lscarso
Date:     2018-02-14 15:44:38 +0100 (Wed, 14 Feb 2018)
Log Message:
-----------
code clean up; fixed luatex_svnversion.h

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/luatexdir/font/mapfile.h
    trunk/Build/source/texk/web2c/luatexdir/font/mapfile.w
    trunk/Build/source/texk/web2c/luatexdir/font/writettf.w
    trunk/Build/source/texk/web2c/luatexdir/lua/lepdflib.cc
    trunk/Build/source/texk/web2c/luatexdir/luasocket/src/lua_preload.c
    trunk/Build/source/texk/web2c/luatexdir/luatex.c
    trunk/Build/source/texk/web2c/luatexdir/luatex_svnversion.h

Modified: trunk/Build/source/texk/web2c/luatexdir/font/mapfile.h
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/font/mapfile.h	2018-02-14 07:58:50 UTC (rev 46632)
+++ trunk/Build/source/texk/web2c/luatexdir/font/mapfile.h	2018-02-14 14:44:38 UTC (rev 46633)
@@ -110,7 +110,7 @@
 ff_entry *check_ff_exist(char *, boolean);
 void pdfmapfile(int);
 void pdfmapline(int);
-void pdf_init_map_file(char *map_name);
+void pdf_init_map_file(const char *map_name);
 fm_entry *new_fm_entry(void);
 void delete_fm_entry(fm_entry *);
 int avl_do_entry(fm_entry *, int);

Modified: trunk/Build/source/texk/web2c/luatexdir/font/mapfile.w
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/font/mapfile.w	2018-02-14 07:58:50 UTC (rev 46632)
+++ trunk/Build/source/texk/web2c/luatexdir/font/mapfile.w	2018-02-14 14:44:38 UTC (rev 46633)
@@ -613,13 +613,13 @@
     free(s);
 }
 
-void pdf_init_map_file(char *map_name)
+void pdf_init_map_file(const char *map_name)
 {
     assert(mitem == NULL);
     mitem = xtalloc(1, mapitem);
     mitem->mode = FM_DUPIGNORE;
     mitem->type = MAPFILE;
-    mitem->line = map_name;
+    mitem->line = xstrdup(map_name);
 }
 
 /**********************************************************************/

Modified: trunk/Build/source/texk/web2c/luatexdir/font/writettf.w
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/font/writettf.w	2018-02-14 07:58:50 UTC (rev 46632)
+++ trunk/Build/source/texk/web2c/luatexdir/font/writettf.w	2018-02-14 14:44:38 UTC (rev 46633)
@@ -539,10 +539,10 @@
     int i, *q;
     void **aa;
     char **glyph_names;
-    long *charcodes;
-    static char buf[SMALL_BUF_SIZE];
+    /*long *charcodes;*/
+    /*static char buf[SMALL_BUF_SIZE];*/
     struct avl_traverser t;
-    ttfenc_entry *e = ttfenc_tab;
+    /*ttfenc_entry *e = ttfenc_tab;*/
 
     assert(fd_cur->tx_tree != NULL);    /* this must be set in |create_fontdictionary| */
 

Modified: trunk/Build/source/texk/web2c/luatexdir/lua/lepdflib.cc
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/lua/lepdflib.cc	2018-02-14 07:58:50 UTC (rev 46632)
+++ trunk/Build/source/texk/web2c/luatexdir/lua/lepdflib.cc	2018-02-14 14:44:38 UTC (rev 46633)
@@ -1665,7 +1665,7 @@
     if (uin->pd != NULL && uin->pd->pc != uin->pc)
         pdfdoc_changed_error(L);
     s = luaL_checkstring(L, 2);
-    *((Object *) uin->d) = Object(objCmd, CHARP_CAST s);
+    *((Object *) uin->d) = Object(objCmd, s);
     return 0;
 }
 

Modified: trunk/Build/source/texk/web2c/luatexdir/luasocket/src/lua_preload.c
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/luasocket/src/lua_preload.c	2018-02-14 07:58:50 UTC (rev 46632)
+++ trunk/Build/source/texk/web2c/luatexdir/luasocket/src/lua_preload.c	2018-02-14 14:44:38 UTC (rev 46633)
@@ -3,6 +3,18 @@
 #include "lua.h"
 #include "lauxlib.h"
 
+int luatex_mbox_lua_open(lua_State*);
+int luatex_headers_lua_open(lua_State*);
+int luatex_socket_lua_open(lua_State*);
+int luatex_ltn12_lua_open(lua_State*);
+int luatex_mime_lua_open(lua_State*);
+int luatex_url_lua_open(lua_State*);
+int luatex_tp_lua_open(lua_State*);
+int luatex_smtp_lua_open(lua_State*);
+int luatex_http_lua_open(lua_State*);
+int luatex_ftp_lua_open(lua_State*);
+
+
 #include "ftp_lua.c"
 #include "headers_lua.c" 
 #include "http_lua.c"

Modified: trunk/Build/source/texk/web2c/luatexdir/luatex.c
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/luatex.c	2018-02-14 07:58:50 UTC (rev 46632)
+++ trunk/Build/source/texk/web2c/luatexdir/luatex.c	2018-02-14 14:44:38 UTC (rev 46633)
@@ -198,7 +198,7 @@
             just use its abstract interface.
         */
         char *source_date_epoch = kpse_var_value("SOURCE_DATE_EPOCH");
-        if (source_date_epoch && source_date_epoch != '\0' ) {
+        if (source_date_epoch) {
             errno = 0;
             epoch = strtoull(source_date_epoch, &endptr, 10);
             if (*endptr != '\0' || errno != 0) {

Modified: trunk/Build/source/texk/web2c/luatexdir/luatex_svnversion.h
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/luatex_svnversion.h	2018-02-14 07:58:50 UTC (rev 46632)
+++ trunk/Build/source/texk/web2c/luatexdir/luatex_svnversion.h	2018-02-14 14:44:38 UTC (rev 46633)
@@ -1 +1 @@
-#define luatex_svn_revision 6587
+#define luatex_svn_revision 6602