// File: /workspace/github_c_makefile_star2_O1/genometools[P]genometools/src/external/lua-5.1.5/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
movq 0x18(%rbx), %rax
movl 0x8(%rax), %edx
movq %rbx, %rdi
movl $0xa, %esi
callq 0x63675
movl %eax, %ebp
xorl %eax, %eax
movl %eax, 0x30(%rsp)
movq $0x0, 0x28(%rsp)
movq %r12, 0x20(%rsp)
movq $-0x1, %rcx
movq %rcx, 0x10(%r12)
movl $0xb, (%r12)
movl %ebp, 0x8(%r12)
movq %rcx, 0x18(%rsp)
movl %eax, 0x8(%rsp)
movl %eax, 0x10(%rsp)
movq 0x30(%r15), %rdi
movq %r12, %rsi
callq 0x635d4
movq %r15, %rdi
movl $0x7b, %esi
callq 0x62931
cmpl $0x7d, 0x10(%r15)
je 0x63fda
leaq 0x28(%r15), %r12
leaq 0x8(%rsp), %r13
cmpl $0x0, 0x8(%rsp)
je 0x63f71
movq %rbx, %rdi
movq %r13, %rsi
callq 0x635d4
movl $0x0, 0x8(%rsp)
cmpl $0x32, 0x30(%rsp)
jne 0x63f71
movq 0x20(%rsp), %rax
movl 0x8(%rax), %esi
movl 0x2c(%rsp), %edx
movq %rbx, %rdi
movl $0x32, %ecx
callq 0x647fa
movl $0x0, 0x30(%rsp)
movl 0x10(%r15), %eax
cmpl $0x5b, %eax
je 0x63f95
cmpl $0x11d, %eax            # imm = 0x11D
jne 0x63fa2
movq %r15, %rdi
movq %r12, %rsi
callq 0x617cb
movl %eax, 0x20(%r15)
cmpl $0x3d, %eax
jne 0x63fa2
movq %r15, %rdi
movq %r13, %rsi
callq 0x646ed
jmp 0x63fad
movq %r15, %rdi
movq %r13, %rsi
callq 0x646a4
movq %r15, %rdi
movl $0x2c, %esi
callq 0x62690
testl %eax, %eax
jne 0x63fcf
movq %r15, %rdi
movl $0x3b, %esi
callq 0x62690
testl %eax, %eax
je 0x63fda
cmpl $0x7d, 0x10(%r15)
jne 0x63f2f
movq %r15, %rdi
movl $0x7d, %esi
movl $0x7b, %edx
movl %r14d, %ecx
callq 0x62717
cmpl $0x0, 0x30(%rsp)
je 0x6405e
movl 0x8(%rsp), %eax
leal -0xd(%rax), %ecx
cmpl $0x2, %ecx
jae 0x64035
leaq 0x8(%rsp), %r14
movq %rbx, %rdi
movq %r14, %rsi
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
callq 0x6498c
movq 0x18(%r14), %rax
movl 0x8(%rax), %esi
movl 0x24(%r14), %edx
movq %rbx, %rdi
movl $0xffffffff, %ecx       # imm = 0xFFFFFFFF
callq 0x647fa
decl 0x24(%r14)
jmp 0x6405e
testl %eax, %eax
je 0x64046
leaq 0x8(%rsp), %rsi
movq %rbx, %rdi
callq 0x635d4
movq 0x20(%rsp), %rax
movl 0x8(%rax), %esi
movl 0x2c(%rsp), %edx
movl 0x30(%rsp), %ecx
movq %rbx, %rdi
callq 0x647fa
movq (%rbx), %rax
movq 0x18(%rax), %rax
movslq %ebp, %rcx
movl $0x7fffff, %edi         # imm = 0x7FFFFF
andl (%rax,%rcx,4), %edi
movl 0x2c(%rsp), %esi
movl $0x8, %edx
cmpl $0x10, %esi
jb 0x6409a
movl $0x8, %r8d
incl %esi
movl %esi, %r9d
shrl %r9d
addl $0x8, %r8d
cmpl $0x1f, %esi
movl %r9d, %esi
ja 0x64084
jmp 0x640a3
movl %esi, %r9d
movl $0x8, %r8d
leal 0x1f8(%r9), %esi
orl %r8d, %esi
cmpl $0x8, %r9d
cmovbl %r9d, %esi
shll $0x17, %esi
orl %edi, %esi
movl %esi, (%rax,%rcx,4)
movl 0x28(%rsp), %r8d
cmpl $0x10, %r8d
jb 0x640e3
movl $0x8, %edx
incl %r8d
movl %r8d, %edi
shrl %edi
addl $0x8, %edx
cmpl $0x1f, %r8d
movl %edi, %r8d
ja 0x640cd
jmp 0x640e6
movl %r8d, %edi
andl $0xff803fff, %esi       # imm = 0xFF803FFF
leal 0x1f8(%rdi), %r8d
orl %edx, %r8d
cmpl $0x8, %edi
cmovbl %edi, %r8d
shll $0xe, %r8d
andl $0x7fc000, %r8d         # imm = 0x7FC000
orl %esi, %r8d
movl %r8d, (%rax,%rcx,4)
addq $0x38, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq