mirrors/lua
0
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2024-11-27 12:13:38 +08:00
Code Issues Packages Projects Releases Wiki Activity

Cleaner definition for 'TString'

Browse Source 
Use a variable-sized array to store string contents at the end of a
structure 'TString', instead of raw memory.
This commit is contained in:
Roberto Ierusalimschy 2020-05-19 12:42:20 -03:00
parent 0be57b9b6d
commit 9514abc2da
2 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lobject.h
View File

@ -356,7 +356,7 @@ typedef struct GCObject {
/*
** Header for string value; string bytes follow the end of this structure.
** Header for a string value.
*/
typedef struct TString {
CommonHeader;
@ -367,16 +367,15 @@ typedef struct TString {
size_t lnglen; /* length for long strings */
struct TString *hnext; /* linked list for hash table */
} u;
char contents[1];
} TString;
/*
** Get the actual string (array of bytes) from a 'TString'.
** (Access to 'extra' ensures that value is really a 'TString'.)
*/
#define getstr(ts) \
check_exp(sizeof((ts)->extra), cast_charp((ts)) + sizeof(TString))
#define getstr(ts) ((ts)->contents)
/* get the actual string (array of bytes) from a Lua value */

6
lstring.h
View File

@ -19,7 +19,11 @@
#define MEMERRMSG "not enough memory"
#define sizelstring(l) (sizeof(TString) + ((l) + 1) * sizeof(char))
/*
** Size of a TString: Size of the header plus space for the string
** itself (including final '\0').
*/
#define sizelstring(l) (offsetof(TString, contents) + ((l) + 1) * sizeof(char))
#define luaS_newliteral(L, s) (luaS_newlstr(L, "" s, \
(sizeof(s)/sizeof(char))-1))