// File: /workspace/github_c_makefile_star2_O3/azhai[P]mlite/mlite.c
// Function: init
void init(void) {
	int	i;

	for (i=2; i<MAX_STREAMS; i++)
		Streams[i] = NULL;
	Streams[0] = stdin;
	Streams[1] = stdout;
	Streams[2] = stderr;
	Stream_flags[0] = LOCK_TAG;
	Stream_flags[1] = LOCK_TAG;
	Stream_flags[2] = LOCK_TAG;
	Instream = 0;
	Outstream = 1;
	Errstream = 2;
	Cons_segment_size = INITIAL_SEGMENT_SIZE;
	Vec_segment_size = INITIAL_SEGMENT_SIZE;
	Cons_pool_size = 0,
	Vec_pool_size = 0;
	Car = NULL,
	Cdr = NULL;
	Tag = NULL;
	Free_list = NIL;
	Vectors = NULL;
	Free_vecs = 0;
	Memory_limit_kn = DEFAULT_LIMIT_KN * 1024L;
	Stack = NIL,
	Stack_bottom = NIL;
	State_stack = NIL;
	Tmp_car = NIL;
	Tmp_cdr = NIL;
	Tmp = NIL;
	Symbols = NIL;
	Program = NIL;
	Exnstack = NIL;
	Exceptions = NIL;
	Proc_ptr = 0;
	Proc_max = 3;
	Environment = NIL;
	Acc = NIL;
	Level = 0;
	Guard_lev = 0;
	Line_no = 1;
	Error_flag = 0;
	Load_level = 0;
	Displaying = 0;
	Printer_limit = 0;
	Quiet_mode = 0;
	Command_line = NULL;
	Run_stats = 0;
	new_cons_segment();
	new_vec_segment();
	gc();
	S_also = symbol_ref("also");
	S_begin = symbol_ref("begin");
	S_callcc = symbol_ref("call/cc");
	S_cons = symbol_ref("::");
	S_define = symbol_ref("define");
	S_define_syntax = symbol_ref("define_syntax");
	S_define_type = symbol_ref("define_type");
	S_else = symbol_ref("else");
	S_equal = symbol_ref("=");
	S_fn = symbol_ref("fn");
	S_from = symbol_ref(">>");
	S_greater = symbol_ref(">");
	S_if = symbol_ref("if");
	S_ignore = symbol_ref("_");
	S_less = symbol_ref("<");
	S_letrec = symbol_ref("letrec");
	S_list = symbol_ref("list");
	S_or = symbol_ref("or");
	S_quasiquote = symbol_ref("quasiquote");
	S_quote = symbol_ref("quote");
	S_raise = symbol_ref("%raise");
	S_ref = symbol_ref("ref");
	S_register = symbol_ref("%register");
	S_setb = symbol_ref("set!");
	S_to = symbol_ref("<<");
	S_tuple = symbol_ref("tuple");
	S_typecheck = symbol_ref("%typecheck");
	S_unquote = symbol_ref("unquote");
	S_unquote_splicing = symbol_ref("unquote-splicing");
	S_unregister = symbol_ref("%unregister");
	Tmp = symbol_ref("x");
	S_primlist = node(S_cons, NIL);
	S_primlist = node(Tmp, S_primlist);
	Tmp = NIL;
	S_primlist = node(S_cons, S_primlist);
	S_primlist = node(S_primlist, NIL);
	S_primlist = node(S_quote, S_primlist);
	init_ops();
	make_initial_env();
	reset_calltrace();
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r14
pushq %rbx
leaq 0x9410(%rip), %rdi      # 0x1e190
xorl %r14d, %r14d
movl $0xf0, %edx
xorl %esi, %esi
callq 0x30d0
movq 0x8242(%rip), %rax      # 0x1cfd8
movq (%rax), %rax
movq %rax, 0x93e0(%rip)      # 0x1e180
movq 0x8229(%rip), %rax      # 0x1cfd0
movq (%rax), %rax
movq %rax, 0x93d7(%rip)      # 0x1e188
movq 0x8240(%rip), %rax      # 0x1cff8
movq (%rax), %rax
movq %rax, 0x93ce(%rip)      # 0x1e190
movw $0x8080, 0x9835(%rip)   # imm = 0x8080
movb $-0x80, 0x9830(%rip)    # 0x1e602
movl %r14d, 0x98bf(%rip)     # 0x1e698
movl $0x1, %eax
movl %eax, 0x949c(%rip)      # 0x1e280
movl $0x2, 0x9e2a(%rip)      # 0x1ec18
movl $0x8000, %ecx           # imm = 0x8000
movl %ecx, 0x97df(%rip)      # 0x1e5d8
movl %ecx, 0x97f5(%rip)      # 0x1e5f4
movl %r14d, 0x97ce(%rip)     # 0x1e5d4
movl %r14d, 0x97e3(%rip)     # 0x1e5f0
movq %r14, 0x935c(%rip)      # 0x1e170
movq %r14, 0x97a5(%rip)      # 0x1e5c0
movq %r14, 0x97be(%rip)      # 0x1e5e0
movq $-0x1, %rbx
movq %rbx, 0x9808(%rip)      # 0x1e638
movq %r14, 0x97b1(%rip)      # 0x1e5e8
movq %r14, 0x983a(%rip)      # 0x1e678
movq $0xc1a000, 0x9827(%rip) # imm = 0xC1A000
movq %rbx, 0x92d8(%rip)      # 0x1e128
movq %rbx, 0x92d9(%rip)      # 0x1e130
movq %rbx, 0x92da(%rip)      # 0x1e138
movq %rbx, 0x92b3(%rip)      # 0x1e118
movq %rbx, 0x92b4(%rip)      # 0x1e120
movq %rbx, 0x929d(%rip)      # 0x1e110
movq %rbx, 0x9286(%rip)      # 0x1e100
movq %rbx, 0x9277(%rip)      # 0x1e0f8
movq %rbx, 0x92e0(%rip)      # 0x1e168
movq %rbx, 0x92d1(%rip)      # 0x1e160
movl %r14d, 0x971a(%rip)     # 0x1e5b0
movl $0x3, 0x93ec(%rip)      # 0x1e28c
movq %rbx, 0x9261(%rip)      # 0x1e108
movq %rbx, 0x9292(%rip)      # 0x1e140
movl %r14d, 0x97cb(%rip)     # 0x1e680
movl %r14d, 0x9824(%rip)     # 0x1e6e0
movl %eax, 0x970e(%rip)      # 0x1e5d0
movl %r14d, 0x96eb(%rip)     # 0x1e5b4
movl %r14d, 0x97b8(%rip)     # 0x1e688
movl %r14d, 0x97e9(%rip)     # 0x1e6c0
movl %r14d, 0x93a6(%rip)     # 0x1e284
movl %r14d, 0x96d3(%rip)     # 0x1e5b8
movq %r14, 0x9cec(%rip)      # 0x1ebd8
movl %r14d, 0x972d(%rip)     # 0x1e620
callq 0x3b01
callq 0x3c25
callq 0x3ed9
leaq 0x179c(%rip), %rdi      # 0x166a5
callq 0x720e
movq %rax, 0x97d3(%rip)      # 0x1e6e8
leaq 0x254a(%rip), %rdi      # 0x17466
callq 0x720e
movq %rax, 0x9830(%rip)      # 0x1e758
leaq 0x20a7(%rip), %rdi      # 0x16fd6
callq 0x720e
movq %rax, 0x97f5(%rip)      # 0x1e730
leaq 0x126b(%rip), %rdi      # 0x161ad
callq 0x720e
movq %rax, 0x9742(%rip)      # 0x1e690
leaq 0x2517(%rip), %rdi      # 0x1746c
callq 0x720e
movq %rax, 0x97ff(%rip)      # 0x1e760
leaq 0x250b(%rip), %rdi      # 0x17473
callq 0x720e
movq %rax, 0x981c(%rip)      # 0x1e790
leaq 0x2506(%rip), %rdi      # 0x17481
callq 0x720e
movq %rax, 0x97e9(%rip)      # 0x1e770
leaq 0x1728(%rip), %rdi      # 0x166b6
callq 0x720e
movq %rax, 0x9c5e(%rip)      # 0x1ebf8
leaq 0x11fc(%rip), %rdi      # 0x1619d
callq 0x720e
movq %rax, 0x974b(%rip)      # 0x1e6f8
leaq 0x1640(%rip), %rdi      # 0x165f4
callq 0x720e
movq %rax, 0x9748(%rip)      # 0x1e708
leaq 0x16db(%rip), %rdi      # 0x166a2
callq 0x720e
movq %rax, 0x9775(%rip)      # 0x1e748
leaq 0x11c7(%rip), %rdi      # 0x161a1
callq 0x720e
movq %rax, 0x979a(%rip)      # 0x1e780
leaq 0x16e2(%rip), %rdi      # 0x166cf
callq 0x720e
movq %rax, 0x9747(%rip)      # 0x1e740
leaq 0x248d(%rip), %rdi      # 0x1748d
callq 0x720e
movq %rax, 0x9bd4(%rip)      # 0x1ebe0
leaq 0x168d(%rip), %rdi      # 0x166a0
callq 0x720e
movq %rax, 0x9759(%rip)      # 0x1e778
leaq 0x2469(%rip), %rdi      # 0x1748f
callq 0x720e
movq %rax, 0x9736(%rip)      # 0x1e768
leaq 0x173f(%rip), %rdi      # 0x16778
callq 0x720e
movq %rax, 0x96d3(%rip)      # 0x1e718
leaq 0x1ffa(%rip), %rdi      # 0x17046
callq 0x720e
movq %rax, 0x96a8(%rip)      # 0x1e700
leaq 0x2437(%rip), %rdi      # 0x17496
callq 0x720e
movq %rax, 0x9635(%rip)      # 0x1e6a0
leaq 0x2429(%rip), %rdi      # 0x1749b
callq 0x720e
movq %rax, 0x962a(%rip)      # 0x1e6a8
leaq 0x241c(%rip), %rdi      # 0x174a1
callq 0x720e
movq %rax, 0x96a7(%rip)      # 0x1e738
leaq 0x1c6a(%rip), %rdi      # 0x16d02
callq 0x720e
movq %rax, 0x966c(%rip)      # 0x1e710
leaq 0x200a(%rip), %rdi      # 0x170b5
callq 0x720e
movq %rax, 0x9671(%rip)      # 0x1e728
leaq 0x23ea(%rip), %rdi      # 0x174a8
callq 0x720e
movq %rax, 0x96be(%rip)      # 0x1e788
leaq 0x15ce(%rip), %rdi      # 0x1669f
callq 0x720e
movq %rax, 0x9673(%rip)      # 0x1e750
leaq 0x16a8(%rip), %rdi      # 0x1678c
callq 0x720e
movq %rax, 0x9600(%rip)      # 0x1e6f0
leaq 0x1fcc(%rip), %rdi      # 0x170c3
callq 0x720e
movq %rax, 0x969d(%rip)      # 0x1e7a0
leaq 0x23a3(%rip), %rdi      # 0x174ad
callq 0x720e
movq %rax, 0x95a2(%rip)      # 0x1e6b8
leaq 0x2398(%rip), %rdi      # 0x174b5
callq 0x720e
movq %rax, 0x9587(%rip)      # 0x1e6b0
leaq 0x1f9e(%rip), %rdi      # 0x170ce
callq 0x720e
movq %rax, 0x95e4(%rip)      # 0x1e720
leaq 0x1f1a(%rip), %rdi      # 0x1705d
callq 0x720e
movq %rax, 0x8fc1(%rip)      # 0x1e110
movq 0x953a(%rip), %rdi      # 0x1e690
movq $-0x1, %rsi
xorl %edx, %edx
callq 0x36e8
movq %rax, 0x962d(%rip)      # 0x1e798
movq 0x8f9e(%rip), %rdi      # 0x1e110
movq %rax, %rsi
xorl %edx, %edx
callq 0x36e8
movq %rax, 0x9615(%rip)      # 0x1e798
movq %rbx, 0x8f86(%rip)      # 0x1e110
movq 0x94ff(%rip), %rdi      # 0x1e690
movq %rax, %rsi
xorl %edx, %edx
callq 0x36e8
movq %rax, 0x95f6(%rip)      # 0x1e798
movq %rax, %rdi
movq $-0x1, %rsi
xorl %edx, %edx
callq 0x36e8
movq %rax, 0x95de(%rip)      # 0x1e798
movq 0x94e7(%rip), %rdi      # 0x1e6a8
movq %rax, %rsi
xorl %edx, %edx
callq 0x36e8
movq %rax, 0x95c6(%rip)      # 0x1e798
callq 0x93c0
callq 0x14baa
leaq 0x90ad(%rip), %rdi      # 0x1e290
movl $0x320, %edx            # imm = 0x320
movl $0xff, %esi
popq %rbx
popq %r14
popq %rbp
jmp 0x30d0