diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1996-03-14 12:54:20 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1996-03-14 12:54:20 -0300 |
| commit | 1dc0e82aeb43d2265fcb6834430e8471729c77e2 (patch) | |
| tree | 8bb9f7280481321955091c4e5f5986f90f72a683 | |
| parent | c2eb02aaf6f0c852b5528a6d47d098af103a6258 (diff) | |
| download | lua-1dc0e82aeb43d2265fcb6834430e8471729c77e2.tar.gz lua-1dc0e82aeb43d2265fcb6834430e8471729c77e2.tar.bz2 lua-1dc0e82aeb43d2265fcb6834430e8471729c77e2.zip | |
"freefunc" now is public.
| -rw-r--r-- | func.c | 4 | ||||
| -rw-r--r-- | func.h | 4 |
2 files changed, 5 insertions, 3 deletions
| @@ -43,7 +43,7 @@ void luaI_insertfunction (TFunc *f) | |||
| 43 | /* | 43 | /* |
| 44 | ** Free function | 44 | ** Free function |
| 45 | */ | 45 | */ |
| 46 | static void freefunc (TFunc *f) | 46 | void luaI_freefunc (TFunc *f) |
| 47 | { | 47 | { |
| 48 | luaI_free (f->code); | 48 | luaI_free (f->code); |
| 49 | luaI_free (f->locvars); | 49 | luaI_free (f->locvars); |
| @@ -68,7 +68,7 @@ Long luaI_funccollector (void) | |||
| 68 | function_root = next; | 68 | function_root = next; |
| 69 | else | 69 | else |
| 70 | prev->next = next; | 70 | prev->next = next; |
| 71 | freefunc (curr); | 71 | luaI_freefunc (curr); |
| 72 | ++counter; | 72 | ++counter; |
| 73 | } | 73 | } |
| 74 | else | 74 | else |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: $ | 2 | ** $Id: func.h,v 1.7 1996/03/08 12:04:04 roberto Exp roberto $ |
| 3 | */ | 3 | */ |
| 4 | 4 | ||
| 5 | #ifndef func_h | 5 | #ifndef func_h |
| @@ -7,6 +7,7 @@ | |||
| 7 | 7 | ||
| 8 | #include "types.h" | 8 | #include "types.h" |
| 9 | #include "lua.h" | 9 | #include "lua.h" |
| 10 | #include "tree.h" | ||
| 10 | 11 | ||
| 11 | typedef struct LocVar | 12 | typedef struct LocVar |
| 12 | { | 13 | { |
| @@ -33,6 +34,7 @@ Long luaI_funccollector (void); | |||
| 33 | void luaI_insertfunction (TFunc *f); | 34 | void luaI_insertfunction (TFunc *f); |
| 34 | 35 | ||
| 35 | void luaI_initTFunc (TFunc *f); | 36 | void luaI_initTFunc (TFunc *f); |
| 37 | void luaI_freefunc (TFunc *f); | ||
| 36 | 38 | ||
| 37 | void luaI_registerlocalvar (TaggedString *varname, int line); | 39 | void luaI_registerlocalvar (TaggedString *varname, int line); |
| 38 | void luaI_unregisterlocalvar (int line); | 40 | void luaI_unregisterlocalvar (int line); |
