source/texk/web2c/luatexdir/luasocket/src/lua_preload.c

   1
   2 #include <stdlib.h>
   3 #include "lua.h"
   4 #include "lauxlib.h"
   5
   6 #include "headers_lua.c"
   7 #include "mbox_lua.c"
   8 #include "socket_lua.c"
   9 #include "ftp_lua.c"
  10 #include "http_lua.c"
  11 #include "smtp_lua.c"
  12 #include "tp_lua.c"
  13 #include "url_lua.c"
  14 #include "ltn12_lua.c"
  15 #include "mime_lua.c"
  16
  17 #define TEST(A) do { if (A) {                                           \
  18     fprintf(stderr,"FATAL error while preloading lua module " #A);      \
  19     exit(1);                                                            \
  20         }                                                               \
  21 } while (0)
  22
  23 void
  24 luatex_socketlua_open (lua_State *L) {
  25     TEST(luatex_mbox_lua_open(L));
  26     TEST(luatex_headers_lua_open(L));
  27     TEST(luatex_socket_lua_open(L));
  28     TEST(luatex_ltn12_lua_open(L));
  29     TEST(luatex_mime_lua_open(L));
  30     TEST(luatex_url_lua_open(L));
  31     TEST(luatex_tp_lua_open(L));
  32     TEST(luatex_smtp_lua_open(L));
  33     TEST(luatex_http_lua_open(L));
  34     TEST(luatex_ftp_lua_open(L));
  35 }