diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-11-24 16:50:36 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-11-24 16:50:36 -0200 |
commit | 5ee63257f9eee2216b6ed06afa93aceac3227fb4 (patch) | |
tree | e6f265aebc65df1d0308aad77566b3db2444680b | |
parent | 8bc6c680219f6fe7dd96ea17235484b0ded5fc15 (diff) | |
download | lua-5ee63257f9eee2216b6ed06afa93aceac3227fb4.tar.gz lua-5ee63257f9eee2216b6ed06afa93aceac3227fb4.tar.bz2 lua-5ee63257f9eee2216b6ed06afa93aceac3227fb4.zip |
macros for closure sizes are global
-rw-r--r-- | lfunc.c | 9 | ||||
-rw-r--r-- | lfunc.h | 9 |
2 files changed, 9 insertions, 9 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lfunc.c,v 1.70 2003/11/17 19:50:05 roberto Exp roberto $ | 2 | ** $Id: lfunc.c,v 1.71 2003/11/19 19:41:30 roberto Exp roberto $ |
3 | ** Auxiliary functions to manipulate prototypes and closures | 3 | ** Auxiliary functions to manipulate prototypes and closures |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -18,13 +18,6 @@ | |||
18 | #include "lstate.h" | 18 | #include "lstate.h" |
19 | 19 | ||
20 | 20 | ||
21 | #define sizeCclosure(n) (cast(int, sizeof(CClosure)) + \ | ||
22 | cast(int, sizeof(TObject)*((n)-1))) | ||
23 | |||
24 | #define sizeLclosure(n) (cast(int, sizeof(LClosure)) + \ | ||
25 | cast(int, sizeof(TObject *)*((n)-1))) | ||
26 | |||
27 | |||
28 | 21 | ||
29 | Closure *luaF_newCclosure (lua_State *L, int nelems) { | 22 | Closure *luaF_newCclosure (lua_State *L, int nelems) { |
30 | Closure *c = cast(Closure *, luaM_malloc(L, sizeCclosure(nelems))); | 23 | Closure *c = cast(Closure *, luaM_malloc(L, sizeCclosure(nelems))); |
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lfunc.h,v 1.21 2003/03/18 12:50:04 roberto Exp roberto $ | 2 | ** $Id: lfunc.h,v 1.22 2003/10/20 17:42:41 roberto Exp roberto $ |
3 | ** Auxiliary functions to manipulate prototypes and closures | 3 | ** Auxiliary functions to manipulate prototypes and closures |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -11,6 +11,13 @@ | |||
11 | #include "lobject.h" | 11 | #include "lobject.h" |
12 | 12 | ||
13 | 13 | ||
14 | #define sizeCclosure(n) (cast(int, sizeof(CClosure)) + \ | ||
15 | cast(int, sizeof(TObject)*((n)-1))) | ||
16 | |||
17 | #define sizeLclosure(n) (cast(int, sizeof(LClosure)) + \ | ||
18 | cast(int, sizeof(TObject *)*((n)-1))) | ||
19 | |||
20 | |||
14 | Proto *luaF_newproto (lua_State *L); | 21 | Proto *luaF_newproto (lua_State *L); |
15 | Closure *luaF_newCclosure (lua_State *L, int nelems); | 22 | Closure *luaF_newCclosure (lua_State *L, int nelems); |
16 | Closure *luaF_newLclosure (lua_State *L, int nelems, TObject *e); | 23 | Closure *luaF_newLclosure (lua_State *L, int nelems, TObject *e); |