Explorar o código

free prototype in (more or less) the same order it is created by
`undump'

Roberto Ierusalimschy %!s(int64=23) %!d(string=hai) anos
pai
achega
425e5813b0
Modificáronse 1 ficheiros con 3 adicións e 3 borrados
  1. 3 3
      lfunc.c

+ 3 - 3
lfunc.c

@@ -1,5 +1,5 @@
 /*
-** $Id: lfunc.c,v 1.59 2002/08/30 19:09:21 roberto Exp roberto $
+** $Id: lfunc.c,v 1.60 2002/10/16 20:40:58 roberto Exp roberto $
 ** Auxiliary functions to manipulate prototypes and closures
 ** See Copyright Notice in lua.h
 */
@@ -96,10 +96,10 @@ Proto *luaF_newproto (lua_State *L) {
 
 void luaF_freeproto (lua_State *L, Proto *f) {
   luaM_freearray(L, f->code, f->sizecode, Instruction);
+  luaM_freearray(L, f->p, f->sizep, Proto *);
+  luaM_freearray(L, f->k, f->sizek, TObject);
   luaM_freearray(L, f->lineinfo, f->sizelineinfo, int);
   luaM_freearray(L, f->locvars, f->sizelocvars, struct LocVar);
-  luaM_freearray(L, f->k, f->sizek, TObject);
-  luaM_freearray(L, f->p, f->sizep, Proto *);
   luaM_freelem(L, f);
 }