// File: /workspace/github_c_makefile_star2_O1/genometools[P]genometools/src/external/lua-5.1.5/src/lparser.c
// Function: funcargs
static void funcargs (LexState *ls, expdesc *f) {
  FuncState *fs = ls->fs;
  expdesc args;
  int base, nparams;
  int line = ls->linenumber;
  switch (ls->t.token) {
    case '(': {  /* funcargs -> `(' [ explist1 ] `)' */
      if (line != ls->lastline)
        luaX_syntaxerror(ls,"ambiguous syntax (function call x new statement)");
      luaX_next(ls);
      if (ls->t.token == ')')  /* arg list is empty? */
        args.k = VVOID;
      else {
        explist1(ls, &args);
        luaK_setmultret(fs, &args);
      }
      check_match(ls, ')', '(', line);
      break;
    }
    case '{': {  /* funcargs -> constructor */
      constructor(ls, &args);
      break;
    }
    case TK_STRING: {  /* funcargs -> STRING */
      codestring(ls, &args, ls->t.seminfo.ts);
      luaX_next(ls);  /* must use `seminfo' before `next' */
      break;
    }
    default: {
      luaX_syntaxerror(ls, "function arguments expected");
      return;
    }
  }
  lua_assert(f->k == VNONRELOC);
  base = f->u.s.info;  /* base register for call */
  if (hasmultret(args.k))
    nparams = LUA_MULTRET;  /* open call */
  else {
    if (args.k != VVOID)
      luaK_exp2nextreg(fs, &args);  /* close last argument */
    nparams = fs->freereg - (base+1);
  }
  init_exp(f, VCALL, luaK_codeABC(fs, OP_CALL, base, nparams+1, 2));
  luaK_fixline(fs, line);
  fs->freereg = base+1;  /* call remove function and arguments and leaves
                            (unless changed) one result */
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movq %rsi, %r14
movq %rdi, %r15
movq 0x30(%rdi), %rbx
movl 0x4(%rdi), %ebp
movl 0x10(%rdi), %edx
leaq 0x10(%rdi), %r13
cmpl $0x11e, %edx            # imm = 0x11E
je 0x64d52
cmpl $0x7b, %edx
je 0x64d42
cmpl $0x28, %edx
jne 0x64e9a
cmpl 0x8(%r15), %ebp
jne 0x64ea3
movl %ebp, 0x8(%r15)
cmpl $0x11f, 0x20(%r15)      # imm = 0x11F
jne 0x64dc8
leaq 0x18(%r15), %rsi
movq %r15, %rdi
callq 0x617cb
movl %eax, 0x10(%r15)
jmp 0x64dda
movq %rsp, %rsi
movq %r15, %rdi
callq 0x63e96
jmp 0x64e1c
movq 0x18(%r15), %rax
movq %rsp, %r12
movq %rax, (%r12)
movl $0x4, %eax
movl %eax, 0x8(%r12)
movq %rbx, %rdi
movq %r12, %rsi
movq %r12, %rdx
callq 0x63ac5
movq $-0x1, 0x10(%r12)
movl $0x4, %ecx
movl %ecx, (%r12)
movl %eax, 0x8(%r12)
movl 0x4(%r15), %eax
movl 0x20(%r15), %ecx
movl %eax, 0x8(%r15)
cmpl $0x11f, %ecx            # imm = 0x11F
jne 0x64db2
leaq 0x18(%r15), %rsi
movq %r15, %rdi
callq 0x617cb
movl %eax, 0x10(%r15)
jmp 0x64e1c
addq $0x20, %r15
movups (%r15), %xmm0
movups %xmm0, (%r13)
movl $0x11f, (%r15)          # imm = 0x11F
jmp 0x64e1c
leaq 0x20(%r15), %rax
movups (%rax), %xmm0
movups %xmm0, (%r13)
movl $0x11f, (%rax)          # imm = 0x11F
cmpl $0x29, (%r13)
jne 0x64dea
movl $0x0, (%rsp)
jmp 0x64e08
movq %rsp, %r12
movq %r15, %rdi
movq %r12, %rsi
callq 0x650eb
movq %rbx, %rdi
movq %r12, %rsi
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
callq 0x6498c
movq %r15, %rdi
movl $0x29, %esi
movl $0x28, %edx
movl %ebp, %ecx
callq 0x62717
movl 0x8(%r14), %r15d
movl (%rsp), %ecx
leal -0xd(%rcx), %edx
xorl %eax, %eax
cmpl $0x2, %edx
jb 0x64e45
testl %ecx, %ecx
je 0x64e3c
movq %rsp, %rsi
movq %rbx, %rdi
callq 0x635d4
movl 0x3c(%rbx), %eax
subl %r15d, %eax
shll $0x17, %eax
movl %r15d, %esi
shll $0x6, %esi
orl %eax, %esi
orl $0x801c, %esi           # imm = 0x801C
movq 0x18(%rbx), %rax
movl 0x8(%rax), %edx
movq %rbx, %rdi
callq 0x63675
movq $-0x1, 0x10(%r14)
movl $0xd, (%r14)
movl %eax, 0x8(%r14)
movq (%rbx), %rax
movq 0x28(%rax), %rax
movslq 0x30(%rbx), %rcx
movl %ebp, -0x4(%rax,%rcx,4)
incl %r15d
movl %r15d, 0x3c(%rbx)
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq 0x89389(%rip), %rsi     # 0xee22a
jmp 0x64eaa
leaq 0x8934f(%rip), %rsi     # 0xee1f9
movq %r15, %rdi
callq 0x62217