module/lua/lgc.c

912   l_mem debt, threshold;
917   debt = -cast(l_mem, threshold - gettotalbytes(g));
918   luaE_setdebt(g, debt);
1139   l_mem debt = g->GCdebt;
1142   /* convert debt from Kb to 'work units' (avoid zero debt and overflows) */
1143   debt = (debt / STEPMULADJ) + 1;
1144   debt = (debt < MAX_LMEM / stepmul) ? debt * stepmul : MAX_LMEM;
1147     debt -= work;
1148   } while (debt > -GCSTEPSIZE && g->gcstate != GCSpause);
1152     debt = (debt / stepmul) * STEPMULADJ;  /* convert 'work units' to Kb */
1153     luaE_setdebt(g, debt);