Function codeblob

lua/lparser.c:155–166

static void codeblob(LexState *ls, expdesc *e, TString *s) {
  const char *err;
  void *blob;
  char *buf = luabb_newblob(ls->L, s->tsv.len / 2, &blob);
  if (parseblob(getstr(s), s->tsv.len, buf) != 0) goto bad;
  Udata *u = (Udata *)((char *)blob - sizeof(Udata));
  init_exp(e, VK, luaK_udataK(ls->fs, u));
  return;
bad:
  err = luaO_pushfstring(ls->L, "bad blob literal: %s", getstr(s));
  luaX_lexerror(ls, err, 0);
}


static void checkname(LexState *ls, expdesc *e) {