diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-02-01 15:40:48 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-02-01 15:40:48 -0200 |
commit | e506b864cdc522ed7bf33e81d785fcfbd40a0368 (patch) | |
tree | c62865ee026136cd8784658110e8928127ad276c /lstring.c | |
parent | 9a231afa9721e87ae5f9790dedcb73cd58472a3f (diff) | |
download | lua-e506b864cdc522ed7bf33e81d785fcfbd40a0368.tar.gz lua-e506b864cdc522ed7bf33e81d785fcfbd40a0368.tar.bz2 lua-e506b864cdc522ed7bf33e81d785fcfbd40a0368.zip |
no need for tags in boxed values :-(
Diffstat (limited to 'lstring.c')
-rw-r--r-- | lstring.c | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lstring.c,v 1.53 2001/01/29 19:34:02 roberto Exp roberto $ | 2 | ** $Id: lstring.c,v 1.54 2001/02/01 13:56:49 roberto Exp roberto $ |
3 | ** String table (keeps all strings handled by Lua) | 3 | ** String table (keeps all strings handled by Lua) |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -76,7 +76,6 @@ TString *luaS_newlstr (lua_State *L, const char *str, size_t l) { | |||
76 | } | 76 | } |
77 | /* not found */ | 77 | /* not found */ |
78 | ts = (TString *)luaM_malloc(L, sizestring(l)); | 78 | ts = (TString *)luaM_malloc(L, sizestring(l)); |
79 | ts->v.ttype = LUA_TSTRING; | ||
80 | ts->marked = 0; | 79 | ts->marked = 0; |
81 | ts->nexthash = NULL; | 80 | ts->nexthash = NULL; |
82 | ts->len = l; | 81 | ts->len = l; |
@@ -92,7 +91,6 @@ TString *luaS_newlstr (lua_State *L, const char *str, size_t l) { | |||
92 | TString *luaS_newudata (lua_State *L, size_t s, void *udata) { | 91 | TString *luaS_newudata (lua_State *L, size_t s, void *udata) { |
93 | union L_UTString *uts = (union L_UTString *)luaM_malloc(L, sizeudata(s)); | 92 | union L_UTString *uts = (union L_UTString *)luaM_malloc(L, sizeudata(s)); |
94 | TString *ts = &uts->ts; | 93 | TString *ts = &uts->ts; |
95 | ts->v.ttype = LUA_TUSERDATA; | ||
96 | ts->marked = 0; | 94 | ts->marked = 0; |
97 | ts->nexthash = NULL; | 95 | ts->nexthash = NULL; |
98 | ts->len = s; | 96 | ts->len = s; |