/* creates a new string and anchors it in function's table so that it will not be collected until the end of the function's compilation (by that time it should be anchored in function's prototype)  */
TString* luaX_newstring(LexState *ls, const char *str, size_t l)
/* creates a new string and anchors it in function's table so that it will not be collected until the end of the function's compilation (by that time it should be anchored in function's prototype)  */
TString* luaX_newstring(LexState *ls, const char *str, size_t l)
{
    setbvalue(o, 1);
    luaC_checkGC(L);
  }
  L->top--;
  return ts;
}