// File: /workspace/github_c_makefile_star2_O3/blakemcbride[P]LISP9/ls9.c
// Function: subr1
int subr1(cell x) {
	if (x == P_abs)		return OP_ABS;
	if (x == P_alphac)	return OP_ALPHAC;
	if (x == P_atom)	return OP_ATOM;
	if (x == P_caar)	return OP_CAAR;
	if (x == P_cadr)	return OP_CADR;
	if (x == P_car)		return OP_CAR;
	if (x == P_catchstar)	return OP_CATCHSTAR;
	if (x == P_cdar)	return OP_CDAR;
	if (x == P_cddr)	return OP_CDDR;
	if (x == P_cdr)		return OP_CDR;
	if (x == P_char)	return OP_CHAR;
	if (x == P_charp)	return OP_CHARP;
	if (x == P_charval)	return OP_CHARVAL;
	if (x == P_close_port)	return OP_CLOSE_PORT;
	if (x == P_constp)	return OP_CONSTP;
	if (x == P_ctagp)	return OP_CTAGP;
	if (x == P_delete)	return OP_DELETE;
	if (x == P_dump_image)	return OP_DUMP_IMAGE;
	if (x == P_downcase)	return OP_DOWNCASE;
	if (x == P_dump_image)	return OP_DUMP_IMAGE;
	if (x == P_eofp)	return OP_EOFP;
	if (x == P_eval)	return OP_EVAL;
	if (x == P_existsp)	return OP_EXISTSP;
	if (x == P_fixp)	return OP_FIXP;
	if (x == P_flush)	return OP_FLUSH;
	if (x == P_format)	return OP_FORMAT;
	if (x == P_funp)	return OP_FUNP;
	if (x == P_inportp)	return OP_INPORTP;
	if (x == P_liststr)	return OP_LISTSTR;
	if (x == P_listvec)	return OP_LISTVEC;
	if (x == P_load)	return OP_LOAD;
	if (x == P_lowerc)	return OP_LOWERC;
	if (x == P_mx)		return OP_MX;
	if (x == P_mx1)		return OP_MX1;
	if (x == P_not)		return OP_NULL;
	if (x == P_null)	return OP_NULL;
	if (x == P_numeric)	return OP_NUMERIC;
	if (x == P_open_infile) return OP_OPEN_INFILE;
	if (x == P_outportp)	return OP_OUTPORTP;
	if (x == P_pair)	return OP_PAIR;
	if (x == P_set_inport)	return OP_SET_INPORT;
	if (x == P_set_outport) return OP_SET_OUTPORT;
	if (x == P_ssize)	return OP_SSIZE;
	if (x == P_stringp)	return OP_STRINGP;
	if (x == P_strlist)	return OP_STRLIST;
	if (x == P_symbol)	return OP_SYMBOL;
	if (x == P_symbolp)	return OP_SYMBOLP;
	if (x == P_symname)	return OP_SYMNAME;
	if (x == P_syscmd)	return OP_SYSCMD;
	if (x == P_untag)	return OP_UNTAG;
	if (x == P_upcase)	return OP_UPCASE;
	if (x == P_upperc)	return OP_UPPERC;
	if (x == P_veclist)	return OP_VECLIST;
	if (x == P_vectorp)	return OP_VECTORP;
	if (x == P_vsize)	return OP_VSIZE;
	if (x == P_whitec)	return OP_WHITEC;
	return -1;
}

// Assembly:
movl $0x1e, %eax
cmpl %edi, 0x11cea(%rip)     # 0x19778
je 0x7e02
movl $0x1f, %eax
cmpl %edi, 0x11cdd(%rip)     # 0x1977c
je 0x7e02
movl $0x20, %eax
cmpl %edi, 0x11cd0(%rip)     # 0x19780
je 0x7e02
movl $0x22, %eax
cmpl %edi, 0x11cc3(%rip)     # 0x19784
je 0x7e02
movl $0x23, %eax
cmpl %edi, 0x11cb6(%rip)     # 0x19788
je 0x7e02
movl $0x24, %eax
cmpl %edi, 0x11ca9(%rip)     # 0x1978c
je 0x7e02
movl $0x11, %eax
cmpl %edi, 0x11c9c(%rip)     # 0x19790
je 0x7e02
movl $0x25, %eax
cmpl %edi, 0x11c8f(%rip)     # 0x19794
je 0x7e02
movl $0x26, %eax
cmpl %edi, 0x11c82(%rip)     # 0x19798
je 0x7e02
movl $0x27, %eax
cmpl %edi, 0x11c75(%rip)     # 0x1979c
je 0x7e02
movl $0x2b, %eax
cmpl %edi, 0x11c68(%rip)     # 0x197a0
je 0x7e02
movl $0x2c, %eax
cmpl %edi, 0x11c5b(%rip)     # 0x197a4
je 0x7e02
movl $0x2d, %eax
cmpl %edi, 0x11c4e(%rip)     # 0x197a8
je 0x7e02
movl $0x2f, %eax
cmpl %edi, 0x11c41(%rip)     # 0x197ac
je 0x7e02
movl $0x34, %eax
cmpl %edi, 0x11c34(%rip)     # 0x197b0
je 0x7e02
movl $0x35, %eax
cmpl %edi, 0x11c27(%rip)     # 0x197b4
je 0x7e02
movl $0x36, %eax
cmpl %edi, 0x11c1a(%rip)     # 0x197b8
je 0x7e02
movl $0x39, %eax
cmpl %edi, 0x11c0d(%rip)     # 0x197bc
je 0x7e02
movl $0x38, %eax
cmpl %edi, 0x11c00(%rip)     # 0x197c0
je 0x7e02
movl $0x3a, %eax
cmpl %edi, 0x11bf3(%rip)     # 0x197c4
je 0x7e02
movl $0x40, %eax
cmpl %edi, 0x11be6(%rip)     # 0x197c8
je 0x7e02
movl $0x41, %eax
cmpl %edi, 0x11bd9(%rip)     # 0x197cc
je 0x7e02
movl $0x42, %eax
cmpl %edi, 0x11bcc(%rip)     # 0x197d0
je 0x7e02
movl $0x43, %eax
cmpl %edi, 0x11bbf(%rip)     # 0x197d4
je 0x7e02
movl $0x44, %eax
cmpl %edi, 0x11bb2(%rip)     # 0x197d8
je 0x7e02
movl $0x45, %eax
cmpl %edi, 0x11ba5(%rip)     # 0x197dc
je 0x7e02
movl $0x4b, %eax
cmpl %edi, 0x11b98(%rip)     # 0x197e0
je 0x7e02
movl $0x4d, %eax
cmpl %edi, 0x11b8b(%rip)     # 0x197e4
je 0x7e02
movl $0x4e, %eax
cmpl %edi, 0x11b7e(%rip)     # 0x197e8
je 0x7e02
movl $0x4f, %eax
cmpl %edi, 0x119b9(%rip)     # 0x19634
je 0x7e02
movl $0x50, %eax
cmpl %edi, 0x11b60(%rip)     # 0x197ec
je 0x7e02
movl $0x57, %eax
cmpl %edi, 0x11b53(%rip)     # 0x197f0
je 0x7e02
movl $0x58, %eax
cmpl %edi, 0x11b46(%rip)     # 0x197f4
je 0x7e02
movl $0x5c, %eax
cmpl %edi, 0x11b39(%rip)     # 0x197f8
je 0x7e02
cmpl %edi, 0x11b31(%rip)     # 0x197fc
je 0x7e02
movl $0x5d, %eax
cmpl %edi, 0x11b24(%rip)     # 0x19800
je 0x7e02
movl $0x60, %eax
cmpl %edi, 0x11b17(%rip)     # 0x19804
je 0x7e02
movl $0x63, %eax
cmpl %edi, 0x11b0a(%rip)     # 0x19808
je 0x7e02
movl $0x64, %eax
cmpl %edi, 0x11afd(%rip)     # 0x1980c
je 0x7e02
movl $0x73, %eax
cmpl %edi, 0x11af0(%rip)     # 0x19810
je 0x7e02
movl $0x74, %eax
cmpl %edi, 0x11ae3(%rip)     # 0x19814
je 0x7e02
movl $0x81, %eax
cmpl %edi, 0x11ad6(%rip)     # 0x19818
je 0x7e02
movl $0x82, %eax
cmpl %edi, 0x11ac9(%rip)     # 0x1981c
je 0x7e02
movl $0x83, %eax
cmpl %edi, 0x11abc(%rip)     # 0x19820
je 0x7e02
movl $0x87, %eax
cmpl %edi, 0x11aaf(%rip)     # 0x19824
je 0x7e02
movl $0x88, %eax
cmpl %edi, 0x11aa2(%rip)     # 0x19828
je 0x7e02
movl $0x89, %eax
cmpl %edi, 0x11a99(%rip)     # 0x1982c
je 0x7e02
movl $0x8b, %eax
cmpl %edi, 0x11a90(%rip)     # 0x19830
je 0x7e02
movl $0x8d, %eax
cmpl %edi, 0x11a87(%rip)     # 0x19834
je 0x7e02
movl $0x8e, %eax
cmpl %edi, 0x11a7e(%rip)     # 0x19838
je 0x7e02
movl $0x8f, %eax
cmpl %edi, 0x11a75(%rip)     # 0x1983c
je 0x7e02
movl $0x91, %eax
cmpl %edi, 0x11a6c(%rip)     # 0x19840
je 0x7e02
movl $0x92, %eax
cmpl %edi, 0x11a63(%rip)     # 0x19844
je 0x7e02
movl $0x96, %eax
cmpl %edi, 0x11a5a(%rip)     # 0x19848
je 0x7e02
xorl %eax, %eax
cmpl %edi, 0x11a54(%rip)     # 0x1984c
setne %al
negl %eax
orl $0x97, %eax
retq