/* Enumerate all of the Protos in the Proto hiearchy and scan contents to collect all referenced strings in a Lua Array at ToS.  */
static void scanProtoStrings(lua_State *L, const Proto *f)
/* Enumerate all of the Protos in the Proto hiearchy and scan contents to collect all referenced strings in a Lua Array at ToS.  */
static void scanProtoStrings(lua_State *L, const Proto *f)
{
    if (ttisstring(f->k + i))
      addTS(L, rawtsvalue(f->k + i));
  }
  for (i = 0; i < f->sizeupvalues; i++) addTS(L, f->upvalues[i]);
  for (i = 0; i < f->sizelocvars; i++)  addTS(L, f->locvars[i].varname);
  for (i = 0; i < f->sizep; i++)        scanProtoStrings(L, f->p[i]);
}