// File: /workspace/github_c_makefile_star2_O0/markdryan[P]subtilis/arch/arm32/assembler.c
// Function: prv_get_double_list
static double *prv_get_double_list(subtilis_arm_ass_context_t *c, size_t *count,
				   subtilis_error_t *err)
{
	const char *tbuf;
	double *new_nums;
	double num;
	double *nums = NULL;
	size_t max_nums = 0;
	size_t num_count = 0;
	subtilis_arm_exp_val_t *val = NULL;

	do {
		val = subtilis_arm_exp_val_get(c, err);
		if (err->type != SUBTILIS_ERROR_OK)
			goto cleanup;

		if (val->type == SUBTILIS_ARM_EXP_TYPE_INT) {
			num = (double)val->val.integer;
		} else if (val->type == SUBTILIS_ARM_EXP_TYPE_REAL) {
			num = val->val.real;
		} else {
			subtilis_error_set_numeric_expected(
			    err, subtilis_arm_exp_type_name(val),
			    c->l->stream->name, c->l->line);
			goto cleanup;
		}

		subtilis_arm_exp_val_free(val);
		val = NULL;

		if (num_count == max_nums) {
			max_nums += 32;
			new_nums = realloc(nums, max_nums * sizeof(*nums));
			if (!new_nums)
				goto cleanup;
			nums = new_nums;
		}

		nums[num_count++] = num;
		tbuf = subtilis_token_get_text(c->t);
	} while ((c->t->type == SUBTILIS_TOKEN_OPERATOR) && !strcmp(tbuf, ","));

	*count = num_count;

	return nums;

cleanup:

	subtilis_arm_exp_val_free(val);
	free(nums);

	return NULL;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x80, %rsp
movq %rdi, -0x10(%rbp)
movq %rsi, -0x18(%rbp)
movq %rdx, -0x20(%rbp)
movq $0x0, -0x40(%rbp)
movq $0x0, -0x48(%rbp)
movq $0x0, -0x50(%rbp)
movq $0x0, -0x58(%rbp)
movq -0x10(%rbp), %rdi
movq -0x20(%rbp), %rsi
callq 0x9b4f0
movq %rax, -0x58(%rbp)
movq -0x20(%rbp), %rax
cmpl $0x0, (%rax)
je 0x93066
jmp 0x931be
movq -0x58(%rbp), %rax
cmpl $0x6, (%rax)
jne 0x9307f
movq -0x58(%rbp), %rax
cvtsi2sdl 0x8(%rax), %xmm0
movsd %xmm0, -0x38(%rbp)
jmp 0x930f3
movq -0x58(%rbp), %rax
cmpl $0x7, (%rax)
jne 0x93098
movq -0x58(%rbp), %rax
movsd 0x8(%rax), %xmm0
movsd %xmm0, -0x38(%rbp)
jmp 0x930f1
movq -0x20(%rbp), %rax
movq %rax, -0x60(%rbp)
movq -0x58(%rbp), %rdi
callq 0x9b550
movq -0x60(%rbp), %rdi
movq %rax, %rdx
movq -0x10(%rbp), %rax
movq 0x8(%rax), %rax
movq 0x30(%rax), %r8
movq -0x10(%rbp), %rax
movq 0x8(%rax), %rax
movl 0x38(%rax), %r9d
movl $0x2c, %esi
leaq 0x181a2(%rip), %rcx     # 0xab276
leaq 0x1b045(%rip), %rax     # 0xae120
movq %rax, (%rsp)
movl $0xee6, 0x8(%rsp)       # imm = 0xEE6
callq 0x156d0
jmp 0x931be
jmp 0x930f3
movq -0x58(%rbp), %rdi
callq 0x9a4c0
movq $0x0, -0x58(%rbp)
movq -0x50(%rbp), %rax
cmpq -0x48(%rbp), %rax
jne 0x93143
movq -0x48(%rbp), %rax
addq $0x20, %rax
movq %rax, -0x48(%rbp)
movq -0x40(%rbp), %rdi
movq -0x48(%rbp), %rsi
shlq $0x3, %rsi
callq 0x121e0
movq %rax, -0x30(%rbp)
cmpq $0x0, -0x30(%rbp)
jne 0x9313b
jmp 0x931be
movq -0x30(%rbp), %rax
movq %rax, -0x40(%rbp)
movsd -0x38(%rbp), %xmm0
movq -0x40(%rbp), %rax
movq -0x50(%rbp), %rcx
movq %rcx, %rdx
addq $0x1, %rdx
movq %rdx, -0x50(%rbp)
movsd %xmm0, (%rax,%rcx,8)
movq -0x10(%rbp), %rax
movq 0x10(%rax), %rdi
callq 0x12d70
movq %rax, -0x28(%rbp)
movq -0x10(%rbp), %rax
movq 0x10(%rax), %rcx
xorl %eax, %eax
cmpl $0x2, (%rcx)
movb %al, -0x61(%rbp)
jne 0x9319e
movq -0x28(%rbp), %rdi
leaq 0x1741b(%rip), %rsi     # 0xaa5a9
callq 0x12140
cmpl $0x0, %eax
setne %al
xorb $-0x1, %al
movb %al, -0x61(%rbp)
movb -0x61(%rbp), %al
testb $0x1, %al
jne 0x93047
movq -0x50(%rbp), %rcx
movq -0x18(%rbp), %rax
movq %rcx, (%rax)
movq -0x40(%rbp), %rax
movq %rax, -0x8(%rbp)
jmp 0x931d8
movq -0x58(%rbp), %rdi
callq 0x9a4c0
movq -0x40(%rbp), %rdi
callq 0x12290
movq $0x0, -0x8(%rbp)
movq -0x8(%rbp), %rax
addq $0x80, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)