// File: /workspace/github_c_makefile_star2_O0/genometools[P]genometools/src/external/lpeg-0.10.2/lpeg.c
// Function: diff_l
static int diff_l (lua_State *L) {
  int l1, l2;
  Instruction *p1 = getpatt(L, 1, &l1);
  Instruction *p2 = getpatt(L, 2, &l2);
  CharsetTag st1, st2;
  if (tocharset(p1, &st1) == ISCHARSET && tocharset(p2, &st2) == ISCHARSET) {
    Instruction *p = newcharset(L);
    loopset(i, p[1].buff[i] = st1.cs[i] & ~st2.cs[i]);
  }
  else if (isheadfail(p2)) {
    Instruction *p = newpatt(L, l2 + 1 + l1);
    p += addpatt(L, p, 2);
    check2test(p - l2, l2 + 1);
    setinst(p++, IFail, 0);
    addpatt(L, p, 1);
  }
  else {  /* !e2 . e1 */
    /* !e -> choice L1; e; failtwice; L1: ... */
    Instruction *p = newpatt(L, 1 + l2 + 1 + l1);
    Instruction *pi = p;
    setinst(p++, IChoice, 1 + l2 + 1);
    p += addpatt(L, p, 2);
    setinst(p++, IFailTwice, 0);
    addpatt(L, p, 1);
    optimizechoice(pi);
  }
  return 1;
}

// Assembly:
subq $0x98, %rsp
movq %rdi, 0x90(%rsp)
movq 0x90(%rsp), %rdi
movl $0x1, %esi
leaq 0x8c(%rsp), %rdx
callq 0x35e4f0
movq %rax, 0x80(%rsp)
movq 0x90(%rsp), %rdi
movl $0x2, %esi
leaq 0x88(%rsp), %rdx
callq 0x35e4f0
movq %rax, 0x78(%rsp)
movq 0x80(%rsp), %rdi
leaq 0x54(%rsp), %rsi
callq 0x35e840
cmpl $0x1, %eax
jne 0x35def7
movq 0x78(%rsp), %rdi
leaq 0x30(%rsp), %rsi
callq 0x35e840
cmpl $0x1, %eax
jne 0x35def7
movq 0x90(%rsp), %rdi
callq 0x361700
movq %rax, 0x28(%rsp)
movl $0x0, 0x24(%rsp)
cmpl $0x20, 0x24(%rsp)
jge 0x35def2
movslq 0x24(%rsp), %rax
movzbl 0x58(%rsp,%rax), %eax
movslq 0x24(%rsp), %rcx
movzbl 0x34(%rsp,%rcx), %ecx
xorl $-0x1, %ecx
andl %ecx, %eax
movb %al, %dl
movq 0x28(%rsp), %rax
movslq 0x24(%rsp), %rcx
movb %dl, 0x8(%rax,%rcx)
movl 0x24(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x24(%rsp)
jmp 0x35deb5
jmp 0x35e08c
movq 0x78(%rsp), %rdi
callq 0x360920
cmpl $0x0, %eax
je 0x35dfc0
movq 0x90(%rsp), %rdi
movl 0x88(%rsp), %eax
addl $0x1, %eax
addl 0x8c(%rsp), %eax
movslq %eax, %rsi
callq 0x35db20
movq %rax, 0x18(%rsp)
movq 0x90(%rsp), %rdi
movq 0x18(%rsp), %rsi
movl $0x2, %edx
callq 0x35f350
movl %eax, %ecx
movq 0x18(%rsp), %rax
movslq %ecx, %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, 0x18(%rsp)
movq 0x18(%rsp), %rdi
movslq 0x88(%rsp), %rcx
xorl %eax, %eax
subq %rcx, %rax
shlq $0x3, %rax
addq %rax, %rdi
movl 0x88(%rsp), %esi
addl $0x1, %esi
callq 0x3609f0
movq 0x18(%rsp), %rdi
movq %rdi, %rax
addq $0x8, %rax
movq %rax, 0x18(%rsp)
movl $0xf, %esi
xorl %ecx, %ecx
movl %ecx, %edx
callq 0x35dbc0
movq 0x90(%rsp), %rdi
movq 0x18(%rsp), %rsi
movl $0x1, %edx
callq 0x35f350
jmp 0x35e08a
movq 0x90(%rsp), %rdi
movl 0x88(%rsp), %eax
addl $0x1, %eax
addl $0x1, %eax
addl 0x8c(%rsp), %eax
movslq %eax, %rsi
callq 0x35db20
movq %rax, 0x10(%rsp)
movq 0x10(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x10(%rsp), %rdi
movq %rdi, %rax
addq $0x8, %rax
movq %rax, 0x10(%rsp)
movl 0x88(%rsp), %edx
addl $0x1, %edx
addl $0x1, %edx
movl $0x7, %esi
xorl %ecx, %ecx
callq 0x35dbc0
movq 0x90(%rsp), %rdi
movq 0x10(%rsp), %rsi
movl $0x2, %edx
callq 0x35f350
movl %eax, %ecx
movq 0x10(%rsp), %rax
movslq %ecx, %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, 0x10(%rsp)
movq 0x10(%rsp), %rdi
movq %rdi, %rax
addq $0x8, %rax
movq %rax, 0x10(%rsp)
movl $0xe, %esi
xorl %ecx, %ecx
movl %ecx, %edx
callq 0x35dbc0
movq 0x90(%rsp), %rdi
movq 0x10(%rsp), %rsi
movl $0x1, %edx
callq 0x35f350
movq 0x8(%rsp), %rdi
callq 0x360a70
jmp 0x35e08c
movl $0x1, %eax
addq $0x98, %rsp
retq
nopl (%rax)