// File: /workspace/github_c_makefile_star2_O1/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, %r13
movq %r13, %rax
shlq $0x1d, %rax
movabsq $0x3e0000000, %rbx      # imm = 0x3E0000000
addq %rax, %rbx
sarq $0x20, %rbx
movq 0x1a4c3(%rip), %rax     # 0x1e678
addq %rbx, %rax
movslq 0x1a431(%rip), %rcx     # 0x1e5f0
cmpq %rcx, %rax
jl 0x4298
callq 0x408a
movq 0x1a4a4(%rip), %rcx     # 0x1e678
addq %rbx, %rcx
movl 0x1a413(%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 0x4298
leaq 0x120e4(%rip), %r14     # 0x162e1
leaq -0xa0(%rbp), %r15
leaq 0x136ea(%rip), %r12     # 0x178f5
movq 0x1a45e(%rip), %rcx     # 0x1e670
testq %rcx, %rcx
je 0x4228
movslq 0x1a3d6(%rip), %rdx     # 0x1e5f4
cltq
addq %rdx, %rax
cmpq %rax, %rcx
jl 0x4285
callq 0x3c2f
callq 0x408a
cmpl $0x0, 0x19eb7(%rip)     # 0x1e0f0
je 0x425e
movl 0x1a3af(%rip), %edx     # 0x1e5f0
movq %r15, %rdi
movq %r14, %rsi
xorl %eax, %eax
callq 0x31f0
movq %r15, %rdi
callq 0x3965
movq %r12, %rdi
callq 0x3965
movq 0x1a413(%rip), %rcx     # 0x1e678
addq %rbx, %rcx
movl 0x1a382(%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 0x420b
jmp 0x4298
leaq 0x11fc6(%rip), %rdi     # 0x16252
movq $-0x8, %rsi
callq 0x33eb
movq 0x1a3d9(%rip), %rax     # 0x1e678
addq %rbx, %rax
movslq 0x1a347(%rip), %rcx     # 0x1e5f0
cmpq %rcx, %rax
jge 0x4335
movq 0x1a3bf(%rip), %r14     # 0x1e678
addq %r14, %rbx
movq %rbx, 0x1a3b5(%rip)     # 0x1e678
shlq $0x20, %r14
movabsq $0x300000000, %rsi      # imm = 0x300000000
addq %r14, %rsi
sarq $0x20, %rsi
movq -0x30(%rbp), %rdi
movl $0x10, %edx
callq 0x36e8
movq 0x1a2fb(%rip), %rcx     # 0x1e5e8
movq %r14, %rdx
sarq $0x1d, %rdx
movq %rax, (%rcx,%rdx)
movabsq $0x100000000, %rdx      # imm = 0x100000000
addq %r14, %rdx
sarq $0x1d, %rdx
movq $0x0, (%rcx,%rdx)
movabsq $0x200000000, %rdx      # imm = 0x200000000
addq %r14, %rdx
sarq $0x1d, %rdx
movq %r13, (%rcx,%rdx)
addq $0x78, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq 0x11fca(%rip), %rdi     # 0x16306
callq 0x3ab5