external/mit/lua/dist/src/lstring.h

   1 /*      $NetBSD: lstring.h,v 1.1.1.2 2012/03/15 00:08:04 alnsn Exp $    */
   2
   3 /*
   4 ** $Id: lstring.h,v 1.1.1.2 2012/03/15 00:08:04 alnsn Exp $
   5 ** String table (keep all strings handled by Lua)
   6 ** See Copyright Notice in lua.h
   7 */
   8
   9 #ifndef lstring_h
  10 #define lstring_h
  11
  12
  13 #include "lgc.h"
  14 #include "lobject.h"
  15 #include "lstate.h"
  16
  17
  18 #define sizestring(s)   (sizeof(union TString)+((s)->len+1)*sizeof(char))
  19
  20 #define sizeudata(u)    (sizeof(union Udata)+(u)->len)
  21
  22 #define luaS_new(L, s)  (luaS_newlstr(L, s, strlen(s)))
  23 #define luaS_newliteral(L, s)   (luaS_newlstr(L, "" s, \
  24                                  (sizeof(s)/sizeof(char))-1))
  25
  26 #define luaS_fix(s)     l_setbit((s)->tsv.marked, FIXEDBIT)
  27
  28 LUAI_FUNC void luaS_resize (lua_State *L, int newsize);
  29 LUAI_FUNC Udata *luaS_newudata (lua_State *L, size_t s, Table *e);
  30 LUAI_FUNC TString *luaS_newlstr (lua_State *L, const char *str, size_t l);
  31
  32
  33 #endif