lib-lua/base.cpkg

   1 @type bool {
   2     .ctype = unsigned : 1;
   3     .check = (luaL_checkinteger($L, $$) != 0);
   4     .push  = lua_pushboolean($L, $$);
   5 };
   6
   7 @type int {
   8     .ctype = int;
   9     .check = luaL_checkinteger($L, $$);
  10     .push  = lua_pushinteger($L, $$);
  11 };
  12
  13 @type quadopt_t {
  14     .ctype = unsigned : 2;
  15     .check = luaM_checkquadopt($L, $$);
  16     .push  = luaM_pushquadopt($L, $$);
  17 };
  18
  19 @type string_t {
  20     .ctype = char *;
  21     .check = luaL_checkstring($L, $$);
  22     .push  = lua_pushstring($L, $$);
  23     .ctor  = m_strdup($$);
  24     .dtor  = p_delete($$);
  25 };
  26
  27 @type path_t : string_t {
  28     .ctor  = luaM_pathnew($$);
  29 };
  30
  31 @type rx_t {
  32     .ctype = rx_t *;
  33     .check = luaM_checkrx($L, $$);
  34     .push  = lua_pushstring($L, $$ ? ($$)->pattern : NULL);
  35     .ctor  = luaM_rxnew($$);
  36     .dtor  = rx_delete($$);
  37 };
  38
  39 @type address_t {
  40     .ctype = address_t *;
  41     .check = luaL_checkstring($L, $$);
  42     .push  = luaM_pushaddr($L, $$);
  43     .ctor  = rfc822_parse_adrlist(NULL, $$);
  44     .dtor  = address_list_wipe($$);
  45 };
  46
  47 /* vim:set ft=c: */