// File: /workspace/github_c_makefile_star2_O0/tylerneylon[P]APIsWithLua/lua/lstring.c
// Function: internshrstr
static TString *internshrstr (lua_State *L, const char *str, size_t l) {
  TString *ts;
  global_State *g = G(L);
  unsigned int h = luaS_hash(str, l, g->seed);
  TString **list = &g->strt.hash[lmod(h, g->strt.size)];
  lua_assert(str != NULL);  /* otherwise 'memcmp'/'memcpy' are undefined */
  for (ts = *list; ts != NULL; ts = ts->u.hnext) {
    if (l == ts->shrlen &&
        (memcmp(str, getstr(ts), l * sizeof(char)) == 0)) {
      /* found! */
      if (isdead(g, ts))  /* dead (but not collected yet)? */
        changewhite(ts);  /* resurrect it */
      return ts;
    }
  }
  if (g->strt.nuse >= g->strt.size && g->strt.size <= MAX_INT/2) {
    luaS_resize(L, g->strt.size * 2);
    list = &g->strt.hash[lmod(h, g->strt.size)];  /* recompute with new size */
  }
  ts = createstrobj(L, l, LUA_TSHRSTR, h);
  memcpy(getstr(ts), str, l * sizeof(char));
  ts->shrlen = cast_byte(l);
  ts->u.hnext = *list;
  *list = ts;
  g->strt.nuse++;
  return ts;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x40, %rsp
movq %rdi, -0x10(%rbp)
movq %rsi, -0x18(%rbp)
movq %rdx, -0x20(%rbp)
movq -0x10(%rbp), %rax
movq 0x18(%rax), %rax
movq %rax, -0x30(%rbp)
movq -0x18(%rbp), %rdi
movq -0x20(%rbp), %rsi
movq -0x30(%rbp), %rax
movl 0x50(%rax), %edx
callq 0x164e0
movl %eax, -0x34(%rbp)
movq -0x30(%rbp), %rax
movq 0x30(%rax), %rax
movl -0x34(%rbp), %ecx
movq -0x30(%rbp), %rdx
movl 0x3c(%rdx), %edx
subl $0x1, %edx
andl %edx, %ecx
movslq %ecx, %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, -0x40(%rbp)
movq -0x40(%rbp), %rax
movq (%rax), %rax
movq %rax, -0x28(%rbp)
cmpq $0x0, -0x28(%rbp)
je 0x16b55
movq -0x20(%rbp), %rax
movq -0x28(%rbp), %rcx
movzbl 0xb(%rcx), %ecx
cmpq %rcx, %rax
jne 0x16b45
movq -0x18(%rbp), %rdi
movq -0x28(%rbp), %rsi
addq $0x18, %rsi
movq -0x20(%rbp), %rdx
shlq $0x0, %rdx
callq 0x5230
cmpl $0x0, %eax
jne 0x16b45
movq -0x28(%rbp), %rax
movzbl 0x9(%rax), %eax
xorl $0x3, %eax
movq -0x30(%rbp), %rcx
movzbl 0x54(%rcx), %ecx
xorl $0x3, %ecx
andl %ecx, %eax
cmpl $0x0, %eax
jne 0x16b38
movq -0x28(%rbp), %rax
movzbl 0x9(%rax), %ecx
xorl $0x3, %ecx
movb %cl, 0x9(%rax)
movq -0x28(%rbp), %rax
movq %rax, -0x8(%rbp)
jmp 0x16c17
jmp 0x16b47
movq -0x28(%rbp), %rax
movq 0x10(%rax), %rax
movq %rax, -0x28(%rbp)
jmp 0x16ad7
movq -0x30(%rbp), %rax
movl 0x38(%rax), %eax
movq -0x30(%rbp), %rcx
cmpl 0x3c(%rcx), %eax
jl 0x16ba9
movq -0x30(%rbp), %rax
cmpl $0x3fffffff, 0x3c(%rax) # imm = 0x3FFFFFFF
jg 0x16ba9
movq -0x10(%rbp), %rdi
movq -0x30(%rbp), %rax
movl 0x3c(%rax), %esi
shll %esi
callq 0x165c0
movq -0x30(%rbp), %rax
movq 0x30(%rax), %rax
movl -0x34(%rbp), %ecx
movq -0x30(%rbp), %rdx
movl 0x3c(%rdx), %edx
subl $0x1, %edx
andl %edx, %ecx
movslq %ecx, %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, -0x40(%rbp)
movq -0x10(%rbp), %rdi
movq -0x20(%rbp), %rsi
movl -0x34(%rbp), %ecx
movl $0x4, %edx
callq 0x16970
movq %rax, -0x28(%rbp)
movq -0x28(%rbp), %rdi
addq $0x18, %rdi
movq -0x18(%rbp), %rsi
movq -0x20(%rbp), %rdx
shlq $0x0, %rdx
callq 0x5300
movq -0x20(%rbp), %rax
movb %al, %cl
movq -0x28(%rbp), %rax
movb %cl, 0xb(%rax)
movq -0x40(%rbp), %rax
movq (%rax), %rcx
movq -0x28(%rbp), %rax
movq %rcx, 0x10(%rax)
movq -0x28(%rbp), %rcx
movq -0x40(%rbp), %rax
movq %rcx, (%rax)
movq -0x30(%rbp), %rax
movl 0x38(%rax), %ecx
addl $0x1, %ecx
movl %ecx, 0x38(%rax)
movq -0x28(%rbp), %rax
movq %rax, -0x8(%rbp)
movq -0x8(%rbp), %rax
addq $0x40, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)