// File: /workspace/github_c_makefile_star2_O1/blakemcbride[P]LISP9/ls9.c
// Function: prex
void prex(int sl, cell x, int d) {
	if (d > PRDEPTH) {
		prints("\n");
		error("prin: nesting too deep", UNDEF);
	}
	if (Intr) {
		Intr = 0;
		error("interrupted", UNDEF);
	}
	if (NIL == x) prints("nil");
	else if (TRUE == x) prints("t");
	else if (EOFMARK == x) prints("#<eof>");
	else if (UNDEF == x) prints("#<undef>");
	else if (charp(x)) prchar(sl, x);
	else if (fixp(x)) prfix(x);
	else if (symbolp(x)) printb(symname(x));
	else if (stringp(x)) prstr(sl, x);
	else if (vectorp(x)) prvec(sl, x, d);
	else if (closurep(x)) prints("#<function>");
	else if (ctagp(x)) prints("#<catch tag>");
	else if (inportp(x)) prport(0, x);
	else if (outportp(x)) prport(1, x);
	else if (specialp(x)) pruspec(x);
	else if (atomp(x)) pruatom(x);
	else if (quoted(x, S_quote)) prquote(sl, x, d);
	else if (quoted(x, S_qquote)) prquote(sl, x, d);
	else if (quoted(x, S_unquote)) prquote(sl, x, d);
	else if (quoted(x, S_splice)) prquote(sl, x, d);
	else prlist(sl, x, d);
}

// Assembly:
pushq %rbx
cmpl $0x401, %edx            # imm = 0x401
jge 0x5875
cmpl $0x0, 0x1402a(%rip)     # 0x19630
jne 0x588f
leal 0x4(%rsi), %eax
cmpl $0x3, %eax
ja 0x5660
leaq 0xda09(%rip), %rcx      # 0x13024
movslq (%rcx,%rax,4), %rax
addq %rcx, %rax
jmpq *%rax
leaq 0xe022(%rip), %rdi      # 0x1364d
movl $0x8, %esi
jmp 0x565a
leaq 0xe91b(%rip), %rdi      # 0x13f54
movl $0x1, %esi
jmp 0x565a
leaq 0xdebc(%rip), %rdi      # 0x13503
movl $0x3, %esi
jmp 0x565a
leaq 0xdff1(%rip), %rdi      # 0x13646
movl $0x6, %esi
popq %rbx
jmp 0x29f6
testl %esi, %esi
js 0x56af
movq 0x13ce5(%rip), %rcx     # 0x19350
movl %esi, %eax
movzbl (%rcx,%rax), %ecx
testb $0x1, %cl
jne 0x56b7
testb $0x8, %cl
jne 0x56cb
testb $0x1, %cl
jne 0x5724
movl %ecx, %r8d
andl $0x11, %r8d
cmpl $0x11, %r8d
jne 0x57ae
movq 0x13ca4(%rip), %r9      # 0x19340
cmpl $-0xf, (%r9,%rax,4)
jne 0x5790
xorl %edi, %edi
popq %rbx
jmp 0x598f
movl %esi, %edi
popq %rbx
jmp 0x5a7c
movq 0x13c82(%rip), %r8      # 0x19340
cmpl $-0xc, (%r8,%rax,4)
jne 0x5701
popq %rbx
jmp 0x5157
movq 0x13c6e(%rip), %r8      # 0x19340
cmpl $-0x12, (%r8,%rax,4)
jne 0x5743
movq 0x13c68(%rip), %rcx     # 0x19348
movslq (%rcx,%rax,4), %rbx
shlq $0x2, %rbx
addq 0x13c69(%rip), %rbx     # 0x19358
movq %rbx, %rdi
callq 0x2080
movq %rbx, %rdi
movl %eax, %esi
jmp 0x565a
testb $0x1, %cl
je 0x5676
movq 0x13c2f(%rip), %r8      # 0x19340
cmpl $-0xe, (%r8,%rax,4)
jne 0x5676
movl %esi, %edi
popq %rbx
jmp 0x5291
movq 0x13c15(%rip), %r8      # 0x19340
cmpl $-0xd, (%r8,%rax,4)
jne 0x5764
leaq 0xdf1d(%rip), %rdi      # 0x13656
movl $0xb, %esi
jmp 0x565a
testb $0x8, %cl
je 0x567b
movq 0x13bed(%rip), %r8      # 0x19340
cmpl $-0x11, (%r8,%rax,4)
jne 0x584e
popq %rbx
jmp 0x531e
testb $0x1, %cl
je 0x5684
movq 0x13bcc(%rip), %r8      # 0x19340
cmpl $-0xb, (%r8,%rax,4)
jne 0x5684
leaq 0xdedc(%rip), %rdi      # 0x13662
movl $0xc, %esi
jmp 0x565a
cmpl $0x11, %r8d
jne 0x57ae
movq 0x13ba3(%rip), %r8      # 0x19340
cmpl $-0x10, (%r8,%rax,4)
jne 0x57ae
movl $0x1, %edi
jmp 0x56a9
testb $0x9, %cl
je 0x57bb
movl %esi, %edi
popq %rbx
jmp 0x5b18
movq 0x13b7e(%rip), %rcx     # 0x19340
movl (%rcx,%rax,4), %ecx
cmpl 0x13e6d(%rip), %ecx     # 0x19638
jne 0x57e9
movq 0x13b74(%rip), %r8      # 0x19348
movslq (%r8,%rax,4), %r9
cmpq $-0x1, %r9
je 0x57e9
cmpl $-0x1, (%r8,%r9,4)
je 0x586f
cmpl 0x13e4d(%rip), %ecx     # 0x1963c
jne 0x5809
movq 0x13b50(%rip), %r8      # 0x19348
movslq (%r8,%rax,4), %r9
cmpq $-0x1, %r9
je 0x5809
cmpl $-0x1, (%r8,%r9,4)
je 0x586f
cmpl 0x13e35(%rip), %ecx     # 0x19644
jne 0x5829
movq 0x13b30(%rip), %r8      # 0x19348
movslq (%r8,%rax,4), %r9
cmpq $-0x1, %r9
je 0x5829
cmpl $-0x1, (%r8,%r9,4)
je 0x586f
cmpl 0x13e11(%rip), %ecx     # 0x19640
jne 0x5848
movq 0x13b10(%rip), %rcx     # 0x19348
movslq (%rcx,%rax,4), %rax
cmpq $-0x1, %rax
je 0x5848
cmpl $-0x1, (%rcx,%rax,4)
je 0x586f
popq %rbx
jmp 0x5510
testb $0x8, %cl
je 0x567b
movq 0x13ae2(%rip), %r8      # 0x19340
cmpl $-0x13, (%r8,%rax,4)
jne 0x567b
popq %rbx
jmp 0x58aa
popq %rbx
jmp 0x5bbe
leaq 0xe95c(%rip), %rdi      # 0x141d8
movl $0x1, %esi
callq 0x29f6
leaq 0xdd96(%rip), %rdi      # 0x13623
jmp 0x58a0
movl $0x0, 0x13d97(%rip)     # 0x19630
leaq 0xdd9a(%rip), %rdi      # 0x1363a
movl $0xfffffffc, %esi       # imm = 0xFFFFFFFC
callq 0x264c