Fix alloc/free sizes of internal GCRef arrays.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/lj_func.c b/src/lj_func.c
index 61a810f2..45685207 100644
--- a/src/lj_func.c
+++ b/src/lj_func.c
@@ -47,7 +47,7 @@ GCproto *lj_func_newproto(lua_State *L)
 void LJ_FASTCALL lj_func_freeproto(global_State *g, GCproto *pt)
 {
   MSize nkgc = round_nkgc(pt->sizekgc);
-  MSize sizek = nkgc*(MSize)sizeof(GCobj *) +
+  MSize sizek = nkgc*(MSize)sizeof(GCRef) +
                 pt->sizekn*(MSize)sizeof(lua_Number);
   lj_mem_free(g, pt->k.gc - nkgc, sizek);
   lj_mem_freevec(g, pt->bc, pt->sizebc, BCIns);