diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-07-30 19:00:50 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-07-30 19:00:50 -0300 |
commit | 0892f0e5b75c51f1fee07276a3ba13301b83409e (patch) | |
tree | 9f3b9ec92f26c05a85c826ffc5f803fda2f48867 /inout.c | |
parent | 1d7857bc635c0bfe7c5b1f325d31feb7660e9a5a (diff) | |
download | lua-0892f0e5b75c51f1fee07276a3ba13301b83409e.tar.gz lua-0892f0e5b75c51f1fee07276a3ba13301b83409e.tar.bz2 lua-0892f0e5b75c51f1fee07276a3ba13301b83409e.zip |
BIG CHANGE: functions have their own "constant table".
Diffstat (limited to 'inout.c')
-rw-r--r-- | inout.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -5,7 +5,7 @@ | |||
5 | ** Also provides some predefined lua functions. | 5 | ** Also provides some predefined lua functions. |
6 | */ | 6 | */ |
7 | 7 | ||
8 | char *rcs_inout="$Id: inout.c,v 2.70 1997/07/07 21:05:51 roberto Exp roberto $"; | 8 | char *rcs_inout="$Id: inout.c,v 2.71 1997/07/29 13:33:15 roberto Exp roberto $"; |
9 | 9 | ||
10 | #include <stdio.h> | 10 | #include <stdio.h> |
11 | #include <string.h> | 11 | #include <string.h> |
@@ -27,7 +27,7 @@ char *rcs_inout="$Id: inout.c,v 2.70 1997/07/07 21:05:51 roberto Exp roberto $"; | |||
27 | 27 | ||
28 | /* Exported variables */ | 28 | /* Exported variables */ |
29 | Word lua_linenumber; | 29 | Word lua_linenumber; |
30 | char *lua_parsedfile; | 30 | TaggedString *lua_parsedfile; |
31 | 31 | ||
32 | 32 | ||
33 | char *luaI_typenames[] = { /* ORDER LUA_T */ | 33 | char *luaI_typenames[] = { /* ORDER LUA_T */ |
@@ -40,7 +40,7 @@ char *luaI_typenames[] = { /* ORDER LUA_T */ | |||
40 | 40 | ||
41 | void luaI_setparsedfile (char *name) | 41 | void luaI_setparsedfile (char *name) |
42 | { | 42 | { |
43 | lua_parsedfile = luaI_createfixedstring(name)->str; | 43 | lua_parsedfile = luaI_createstring(name); |
44 | } | 44 | } |
45 | 45 | ||
46 | 46 | ||
@@ -399,7 +399,7 @@ void luaI_predefine (void) | |||
399 | s_ttype(n) = LUA_T_CFUNCTION; s_fvalue(n) = int_funcs[i].func; | 399 | s_ttype(n) = LUA_T_CFUNCTION; s_fvalue(n) = int_funcs[i].func; |
400 | } | 400 | } |
401 | n = luaI_findsymbolbyname("_VERSION"); | 401 | n = luaI_findsymbolbyname("_VERSION"); |
402 | s_ttype(n) = LUA_T_STRING; s_tsvalue(n) = lua_createstring(LUA_VERSION); | 402 | s_ttype(n) = LUA_T_STRING; s_tsvalue(n) = luaI_createstring(LUA_VERSION); |
403 | } | 403 | } |
404 | 404 | ||
405 | 405 | ||