summaryrefslogtreecommitdiff
path: root/apps/plugins/lua/lstring.h
diff options
context:
space:
mode:
Diffstat (limited to 'apps/plugins/lua/lstring.h')
-rw-r--r--apps/plugins/lua/lstring.h21
1 files changed, 18 insertions, 3 deletions
diff --git a/apps/plugins/lua/lstring.h b/apps/plugins/lua/lstring.h
index c88e4c12a9..260e7f169b 100644
--- a/apps/plugins/lua/lstring.h
+++ b/apps/plugins/lua/lstring.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id$ 2** $Id: lstring.h,v 1.49.1.1 2013/04/12 18:48:47 roberto Exp $
3** String table (keep all strings handled by Lua) 3** String table (keep all strings handled by Lua)
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -7,7 +7,6 @@
7#ifndef lstring_h 7#ifndef lstring_h
8#define lstring_h 8#define lstring_h
9 9
10
11#include "lgc.h" 10#include "lgc.h"
12#include "lobject.h" 11#include "lobject.h"
13#include "lstate.h" 12#include "lstate.h"
@@ -17,15 +16,31 @@
17 16
18#define sizeudata(u) (sizeof(union Udata)+(u)->len) 17#define sizeudata(u) (sizeof(union Udata)+(u)->len)
19 18
20#define luaS_new(L, s) (luaS_newlstr(L, s, strlen(s)))
21#define luaS_newliteral(L, s) (luaS_newlstr(L, "" s, \ 19#define luaS_newliteral(L, s) (luaS_newlstr(L, "" s, \
22 (sizeof(s)/sizeof(char))-1)) 20 (sizeof(s)/sizeof(char))-1))
23 21
24#define luaS_fix(s) l_setbit((s)->tsv.marked, FIXEDBIT) 22#define luaS_fix(s) l_setbit((s)->tsv.marked, FIXEDBIT)
25 23
24
25/*
26** test whether a string is a reserved word
27*/
28#define isreserved(s) ((s)->tsv.tt == LUA_TSHRSTR && (s)->tsv.extra > 0)
29
30
31/*
32** equality for short strings, which are always internalized
33*/
34#define eqshrstr(a,b) check_exp((a)->tsv.tt == LUA_TSHRSTR, (a) == (b))
35
36
37LUAI_FUNC unsigned int luaS_hash (const char *str, size_t l, unsigned int seed);
38LUAI_FUNC int luaS_eqlngstr (TString *a, TString *b);
39LUAI_FUNC int luaS_eqstr (TString *a, TString *b);
26LUAI_FUNC void luaS_resize (lua_State *L, int newsize); 40LUAI_FUNC void luaS_resize (lua_State *L, int newsize);
27LUAI_FUNC Udata *luaS_newudata (lua_State *L, size_t s, Table *e); 41LUAI_FUNC Udata *luaS_newudata (lua_State *L, size_t s, Table *e);
28LUAI_FUNC TString *luaS_newlstr (lua_State *L, const char *str, size_t l); 42LUAI_FUNC TString *luaS_newlstr (lua_State *L, const char *str, size_t l);
43LUAI_FUNC TString *luaS_new (lua_State *L, const char *str);
29 44
30 45
31#endif 46#endif