// File: /workspace/github_c_makefile_star2_O3/gplessis[P]dotdeb-redis/deps/lua/src/lparser.c
// Function: constructor
static void constructor (LexState *ls, expdesc *t) {
  /* constructor -> ?? */
  FuncState *fs = ls->fs;
  int line = ls->linenumber;
  int pc = luaK_codeABC(fs, OP_NEWTABLE, 0, 0, 0);
  struct ConsControl cc;
  cc.na = cc.nh = cc.tostore = 0;
  cc.t = t;
  init_exp(t, VRELOCABLE, pc);
  init_exp(&cc.v, VVOID, 0);  /* no value (yet) */
  luaK_exp2nextreg(ls->fs, t);  /* fix it at stack top (for gc) */
  checknext(ls, '{');
  do {
    lua_assert(cc.v.k == VVOID || cc.tostore > 0);
    if (ls->t.token == '}') break;
    closelistfield(fs, &cc);
    switch(ls->t.token) {
      case TK_NAME: {  /* may be listfields or recfields */
        luaX_lookahead(ls);
        if (ls->lookahead.token != '=')  /* expression? */
          listfield(ls, &cc);
        else
          recfield(ls, &cc);
        break;
      }
      case '[': {  /* constructor_item -> recfield */
        recfield(ls, &cc);
        break;
      }
      default: {  /* constructor_part -> listfield */
        listfield(ls, &cc);
        break;
      }
    }
  } while (testnext(ls, ',') || testnext(ls, ';'));
  check_match(ls, '}', '{', line);
  lastlistfield(fs, &cc);
  SETARG_B(fs->f->code[pc], luaO_int2fb(cc.na)); /* set initial array size */
  SETARG_C(fs->f->code[pc], luaO_int2fb(cc.nh));  /* set initial table size */
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x38, %rsp
movq %rsi, %r12
movq %rdi, %r15
movq 0x30(%rdi), %rbx
movl 0x4(%rdi), %r14d
xorl %r13d, %r13d
movq %rbx, %rdi
movl $0xa, %esi
xorl %edx, %edx
xorl %ecx, %ecx
xorl %r8d, %r8d
callq 0x11983
movl %eax, %ebp
movl %r13d, 0x30(%rsp)
movq $0x0, 0x28(%rsp)
movq %r12, 0x20(%rsp)
movq $-0x1, %rax
movq %rax, 0x10(%r12)
movl $0xb, (%r12)
movl %ebp, 0x8(%r12)
movq %rax, 0x18(%rsp)
movl %r13d, 0x8(%rsp)
movl %r13d, 0x10(%rsp)
movq 0x30(%r15), %rdi
movq %r12, %rsi
callq 0x11f51
movq %r15, %rdi
movl $0x7b, %esi
callq 0xb73c
movl 0x10(%r15), %eax
cmpl $0x7d, %eax
je 0xbbf8
leaq 0x8(%rsp), %r12
cmpl $0x0, 0x8(%rsp)
je 0xbba2
movq %rbx, %rdi
movq %r12, %rsi
callq 0x11f51
movl $0x0, 0x8(%rsp)
cmpl $0x32, 0x30(%rsp)
jne 0xbb9e
movq 0x20(%rsp), %rax
movl 0x8(%rax), %esi
movl 0x2c(%rsp), %edx
movq %rbx, %rdi
movl $0x32, %ecx
callq 0x12c63
movl $0x0, 0x30(%rsp)
movl 0x10(%r15), %eax
cmpl $0x5b, %eax
je 0xbbbd
cmpl $0x11d, %eax            # imm = 0x11D
jne 0xbbca
movq %r15, %rdi
callq 0x13966
cmpl $0x3d, 0x20(%r15)
jne 0xbbca
movq %r15, %rdi
movq %r12, %rsi
callq 0xc16e
jmp 0xbbd5
movq %r15, %rdi
movq %r12, %rsi
callq 0xc12b
movl 0x10(%r15), %eax
cmpl $0x3b, %eax
je 0xbbe3
cmpl $0x2c, %eax
jne 0xbbf8
movq %r15, %rdi
callq 0x1315f
movl 0x10(%r15), %eax
cmpl $0x7d, %eax
jne 0xbb5c
movq %r15, %rdi
movl $0x7d, %esi
movl $0x7b, %edx
movl %r14d, %ecx
callq 0xb610
movl 0x30(%rsp), %ecx
testl %ecx, %ecx
je 0xbc80
movl 0x8(%rsp), %eax
leal -0xd(%rax), %edx
cmpl $0x2, %edx
jae 0xbc54
leaq 0x8(%rsp), %r14
movq %rbx, %rdi
movq %r14, %rsi
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
callq 0x11de4
movq 0x18(%r14), %rax
movl 0x8(%rax), %esi
movl 0x24(%r14), %edx
movq %rbx, %rdi
movl $0xffffffff, %ecx       # imm = 0xFFFFFFFF
callq 0x12c63
decl 0x24(%r14)
jmp 0xbc80
testl %eax, %eax
je 0xbc6c
leaq 0x8(%rsp), %r14
movq %rbx, %rdi
movq %r14, %rsi
callq 0x11f51
movl 0x28(%r14), %ecx
movq 0x20(%rsp), %rax
movl 0x8(%rax), %esi
movl 0x2c(%rsp), %edx
movq %rbx, %rdi
callq 0x12c63
movq (%rbx), %rax
movq 0x18(%rax), %rax
movslq %ebp, %r14
movl $0x7fffff, %r15d        # imm = 0x7FFFFF
andl (%rax,%r14,4), %r15d
movl 0x2c(%rsp), %edi
callq 0xa258
movl %eax, %ebp
shll $0x17, %ebp
orl %r15d, %ebp
movq (%rbx), %rax
movq 0x18(%rax), %rax
movl %ebp, (%rax,%r14,4)
andl $0xff803fff, %ebp       # imm = 0xFF803FFF
movl 0x28(%rsp), %edi
callq 0xa258
shll $0xe, %eax
andl $0x7fc000, %eax         # imm = 0x7FC000
orl %ebp, %eax
movq (%rbx), %rcx
movq 0x18(%rcx), %rcx
movl %eax, (%rcx,%r14,4)
addq $0x38, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq