// File: /workspace/github_c_makefile_star2_O3/azhai[P]mlite/mlite.c
// Function: new_vec
cell new_vec(cell type, int size) {
	cell	n;
	int	v, wsize;
	char	buf[100];

	wsize = vector_size(size);
	if (Free_vecs + wsize >= Vec_pool_size) {
		gcv();
		while (	Free_vecs + wsize >=
			Vec_pool_size - Vec_pool_size / 2
		) {
			if (	Memory_limit_kn &&
				Vec_pool_size + Vec_segment_size
					> Memory_limit_kn
			) {
				error("hit memory limit", NOEXPR);
				break;
			}
			else {
				new_vec_segment();
				gcv();
				if (Verbose_GC) {
					sprintf(buf,
						"GC: new_vec: new segment,"
						 " cells = %d",
						Vec_pool_size);
					pr(buf); nl();
				}
			}
		}
	}
	if (Free_vecs + wsize >= Vec_pool_size)
		fatal("new_vec: failed to recover from low memory condition");
	v = Free_vecs;
	Free_vecs += wsize;
	n = node3(type, v + RAW_VECTOR_DATA, VECTOR_TAG);
	Vectors[v + RAW_VECTOR_LINK] = n;
	Vectors[v + RAW_VECTOR_INDEX] = 0;
	Vectors[v + RAW_VECTOR_SIZE] = size;
	return n;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x78, %rsp
movq %rdi, -0x30(%rbp)
movslq %esi, %rax
movq 0x1a4eb(%rip), %r13     # 0x1e678
movq %rax, -0x38(%rbp)
shlq $0x1d, %rax
movabsq $0x3e0000000, %rbx      # imm = 0x3E0000000
addq %rax, %rbx
sarq $0x20, %rbx
leaq (%rbx,%r13), %rcx
movslq 0x1a43f(%rip), %rax     # 0x1e5f0
cmpq %rax, %rcx
jl 0x429f
callq 0x4079
movq 0x1a4b2(%rip), %r13     # 0x1e678
leaq (%rbx,%r13), %rcx
movl 0x1a420(%rip), %eax     # 0x1e5f0
movl %eax, %edx
shrl $0x1f, %edx
addl %eax, %edx
sarl %edx
movl %eax, %esi
subl %edx, %esi
movslq %esi, %rdx
cmpq %rdx, %rcx
jl 0x429f
leaq 0x120d9(%rip), %r14     # 0x162c9
leaq -0xa0(%rbp), %r15
leaq 0x136d9(%rip), %r12     # 0x178d7
movq 0x1a46b(%rip), %rcx     # 0x1e670
testq %rcx, %rcx
je 0x421b
movslq 0x1a3e3(%rip), %rdx     # 0x1e5f4
cltq
addq %rdx, %rax
cmpq %rax, %rcx
jl 0x4279
callq 0x3c25
callq 0x4079
cmpl $0x0, 0x19ec4(%rip)     # 0x1e0f0
je 0x4251
movl 0x1a3bc(%rip), %edx     # 0x1e5f0
movq %r15, %rdi
movq %r14, %rsi
xorl %eax, %eax
callq 0x31f0
movq %r15, %rdi
callq 0x3964
movq %r12, %rdi
callq 0x3964
movq 0x1a420(%rip), %r13     # 0x1e678
leaq (%rbx,%r13), %rcx
movl 0x1a38e(%rip), %eax     # 0x1e5f0
movl %eax, %edx
shrl $0x1f, %edx
addl %eax, %edx
sarl %edx
movl %eax, %esi
subl %edx, %esi
movslq %esi, %rdx
cmpq %rdx, %rcx
jge 0x41fe
jmp 0x429f
leaq 0x11fba(%rip), %rdi     # 0x1623a
movq $-0x8, %rsi
callq 0x33eb
movq 0x1a3e5(%rip), %r13     # 0x1e678
movl 0x1a357(%rip), %eax     # 0x1e5f0
addq %r13, %rbx
movq %rbx, %rcx
cltq
cmpq %rax, %rcx
jge 0x4323
movq %rcx, 0x1a3cb(%rip)     # 0x1e678
shlq $0x20, %r13
movabsq $0x300000000, %rsi      # imm = 0x300000000
addq %r13, %rsi
sarq $0x20, %rsi
movq -0x30(%rbp), %rdi
movl $0x10, %edx
callq 0x36e8
movq 0x1a311(%rip), %rcx     # 0x1e5e8
movq %r13, %rdx
sarq $0x1d, %rdx
movq %rax, (%rcx,%rdx)
movabsq $0x100000000, %rdx      # imm = 0x100000000
addq %r13, %rdx
sarq $0x1d, %rdx
movq $0x0, (%rcx,%rdx)
movabsq $0x200000000, %rdx      # imm = 0x200000000
addq %r13, %rdx
sarq $0x1d, %rdx
movq -0x38(%rbp), %rsi
movq %rsi, (%rcx,%rdx)
addq $0x78, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq 0x11fc4(%rip), %rdi     # 0x162ee
callq 0x3ab4