// File: /workspace/github_c_makefile_star2_O3/blakemcbride[P]LISP9/ls9.c
// Function: appconv
cell appconv(cell x, cell e, cell a) {
	cell	fn, as, fv, fnargs, m, n, lv, vars, cv;

	fn = car(x);
	as = cdr(x);
	fv = freevars(fn, NIL);
	protect(fv);
	fnargs = flatargs(cadr(fn));
	protect(fnargs);
	newvars(fv);
	m = initmap(fv, e, a);
	protect(m);
	as = mapconv(as, e, a);
	protect(as);
	n = liftargs(m);
	as = nconc(n, as);
	car(Protected) = as;
	lv = liftnames(m);
	protect(lv);
	vars = conc(lv, cadr(fn));
	protect(vars);
	cv = set_union(lv, fnargs);
	cadr(Protected) = cv;
	fn = mapconv(cddr(fn), e, cv);
	fn = cons(NIL, fn);
	fn = cons(vars, fn);
	fn = cons(I_closure, fn);
	unprot(6);
	return cons(fn, as);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movl %edx, %r14d
movl %esi, %ebx
movq 0x1238f(%rip), %rax     # 0x19340
movslq %edi, %rcx
movl (%rax,%rcx,4), %ebp
movq 0x1238a(%rip), %rax     # 0x19348
movl (%rax,%rcx,4), %r15d
movl %ebp, %edi
movl $0xffffffff, %esi       # imm = 0xFFFFFFFF
callq 0x6346
movl %eax, %r12d
movl 0x12199(%rip), %esi     # 0x19170
movl %eax, %edi
xorl %edx, %edx
callq 0x30e7
movl %eax, 0x1218a(%rip)     # 0x19170
movq 0x12353(%rip), %rax     # 0x19340
movq 0x12354(%rip), %rcx     # 0x19348
movslq %ebp, %r13
movslq (%rcx,%r13,4), %rcx
movl (%rax,%rcx,4), %edi
callq 0x6008
movl 0x12167(%rip), %esi     # 0x19170
movl %eax, 0x4(%rsp)
movl %eax, %edi
xorl %edx, %edx
callq 0x30e7
movl %eax, 0x12154(%rip)     # 0x19170
cmpl $-0x1, %r12d
je 0x7046
movl %r12d, %eax
movq 0x12314(%rip), %rcx     # 0x19340
movslq %eax, %rbp
movl (%rcx,%rbp,4), %edi
callq 0x6858
movq 0x1230a(%rip), %rax     # 0x19348
movl (%rax,%rbp,4), %eax
cmpl $-0x1, %eax
jne 0x7025
movl %r12d, %edi
movl %ebx, %esi
movl %r14d, %edx
callq 0x666f
movl %eax, %r12d
movl 0x12114(%rip), %esi     # 0x19170
movl %eax, %edi
xorl %edx, %edx
callq 0x30e7
movl %eax, 0x12105(%rip)     # 0x19170
movl %r15d, %edi
movl %ebx, %esi
movl %r14d, %edx
callq 0x68fd
movl %eax, %r15d
movl 0x120ef(%rip), %esi     # 0x19170
movl %eax, %edi
xorl %edx, %edx
callq 0x30e7
movl %eax, 0x120e0(%rip)     # 0x19170
movl %r12d, %edi
callq 0x6eb1
cmpl $-0x1, %eax
je 0x70bb
movl %eax, %r14d
movq 0x122a1(%rip), %rax     # 0x19348
movl %r14d, %ecx
movslq %ecx, %rdx
movl (%rax,%rdx,4), %ecx
cmpl $-0x1, %ecx
jne 0x70aa
movl %r15d, (%rax,%rdx,4)
jmp 0x70be
movl %r15d, %r14d
movq 0x1227b(%rip), %rax     # 0x19340
movslq 0x120a4(%rip), %rcx     # 0x19170
movl %r14d, (%rax,%rcx,4)
movl %r12d, %edi
callq 0x6e0e
movl %eax, %r12d
movl 0x1208f(%rip), %esi     # 0x19170
movl %eax, %edi
xorl %edx, %edx
callq 0x30e7
movl %eax, 0x12080(%rip)     # 0x19170
movq 0x12249(%rip), %rax     # 0x19340
movq 0x1224a(%rip), %rcx     # 0x19348
movslq (%rcx,%r13,4), %rcx
movl (%rax,%rcx,4), %esi
movl %r12d, %edi
callq 0x3e0f
movl %eax, %r15d
movl 0x1205a(%rip), %esi     # 0x19170
movl %eax, %edi
xorl %edx, %edx
callq 0x30e7
movl %eax, 0x1204b(%rip)     # 0x19170
movl %r12d, %edi
movl 0x4(%rsp), %esi
callq 0x6243
movq 0x12208(%rip), %rcx     # 0x19340
movq 0x12209(%rip), %rdx     # 0x19348
movslq 0x1202a(%rip), %rsi     # 0x19170
movslq (%rdx,%rsi,4), %rsi
movl %eax, (%rcx,%rsi,4)
movslq (%rdx,%r13,4), %rcx
movl (%rdx,%rcx,4), %edi
movl %ebx, %esi
movl %eax, %edx
callq 0x68fd
movl $0xffffffff, %edi       # imm = 0xFFFFFFFF
movl %eax, %esi
xorl %edx, %edx
callq 0x30e7
movl %r15d, %edi
movl %eax, %esi
xorl %edx, %edx
callq 0x30e7
movl 0x125c3(%rip), %edi     # 0x19740
movl %eax, %esi
xorl %edx, %edx
callq 0x30e7
movl %eax, %ebx
movl $0x6, %edi
callq 0x335c
movl %ebx, %edi
movl %r14d, %esi
xorl %edx, %edx
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x30e7