// File: /workspace/github_c_makefile_star2_O2/chatziko-k08[P]lecture-code/tests/ADTList_test.c
// Function: test_remove_next
void test_remove_next(void) {
	// Δημιουργία λίστας που καλεί αυτόματα τη free σε κάθε στοιχείο που αφαιρείται
	List list = list_create(free);

	int N = 1000;
	int** array = malloc(N * sizeof(*array));					

	// Χρησιμοποιούμε την insert για να γεμίσουμε την λίστα, αφού την έχουμε δοκιμάσει ήδη στην test_insert()
	for (int i = 0; i < N; i++) {
		
		// Δημιουργούμε δυναμικά δεσμευμένα αντικείμενα για να δοκιμάσουμε την destroy_function
		array[i]  = malloc(sizeof(int));
		*array[i] = i;
		list_insert_next(list, LIST_BOF, array[i]);
	}


	for (int i = N - 1; i >= 0; i--) {
		// Διαγράφουμε απο την αρχή και ελέγχουμε εάν η τιμή του πρώτου κόμβου 
		// ήταν η ίδια με αυτή που κάναμε insert παραπάνω
		TEST_ASSERT(list_node_value(list, list_first(list)) == array[i]);
		list_remove_next(list, LIST_BOF);

		// Ελέγχουμε ότι ενημερώνεται (μειώνεται) το size/μέγεθος της λίστας
		TEST_ASSERT(list_size(list) == i);
	}

	// Ξαναγεμίζουμε την λίστα για να δοκιμάσουμε την διαγραφή απο ενδιάμεσο κόμβο
	for (int i = 0; i < N; i++) {
		array[i]  = malloc(sizeof(int));
		*array[i] = i;
		list_insert_next(list, LIST_BOF, array[i]);
	}	

	// Δοκιμάζουμε την διαγραφή κόμβων ενδιάμεσα της λίστας, και συγκεκριμένα του δεύτερου κόμβου απο την αρχή
	list_remove_next(list, list_first(list));
	TEST_ASSERT(list_size(list) == N - 1);

	list_destroy(list);
	free(array);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movq 0x431a(%rip), %rdi      # 0x7fc0
callq 0x4594
movq %rax, %rbx
movl $0x1f40, %edi           # imm = 0x1F40
callq 0x21a0
movq %rax, %r14
xorl %r12d, %r12d
pushq $0x4
popq %r15
cmpq $0x3e8, %r12            # imm = 0x3E8
je 0x3cec
movq %r15, %rdi
callq 0x21a0
movq %rax, (%r14,%r12,8)
movl %r12d, (%rax)
movq %rbx, %rdi
xorl %esi, %esi
movq %rax, %rdx
callq 0x45d0
incq %r12
jmp 0x3cc2
movl $0x3e7, %r13d           # imm = 0x3E7
leaq 0x161f(%rip), %r15      # 0x5318
leaq 0x189a(%rip), %r12      # 0x559a
pushq $0x56
popq %rbp
testl %r13d, %r13d
js 0x3d80
movq %rbx, %rdi
callq 0x4701
movq %rbx, %rdi
movq %rax, %rsi
callq 0x473f
movl %r13d, %ecx
xorl %edi, %edi
cmpq (%r14,%rcx,8), %rax
sete %dil
movq %r15, %rsi
pushq $0x52
popq %rdx
movq %r12, %rcx
leaq 0x16c5(%rip), %r8       # 0x53fd
xorl %eax, %eax
callq 0x238c
testl %eax, %eax
je 0x3d7b
movq %rbx, %rdi
xorl %esi, %esi
callq 0x460e
movq %rbx, %rdi
callq 0x45cc
xorl %edi, %edi
cmpl %eax, %r13d
sete %dil
movq %r15, %rsi
movl %ebp, %edx
movq %r12, %rcx
leaq 0x16c4(%rip), %r8       # 0x5431
xorl %eax, %eax
callq 0x238c
decl %r13d
testl %eax, %eax
jne 0x3d03
callq 0x2bb0
xorl %r12d, %r12d
pushq $0x4
popq %r15
cmpq $0x3e8, %r12            # imm = 0x3E8
je 0x3db1
movq %r15, %rdi
callq 0x21a0
movq %rax, (%r14,%r12,8)
movl %r12d, (%rax)
movq %rbx, %rdi
xorl %esi, %esi
movq %rax, %rdx
callq 0x45d0
incq %r12
jmp 0x3d87
movq %rbx, %rdi
callq 0x4701
movq %rbx, %rdi
movq %rax, %rsi
callq 0x460e
movq %rbx, %rdi
callq 0x45cc
xorl %edi, %edi
cmpl $0x3e7, %eax            # imm = 0x3E7
sete %dil
leaq 0x153a(%rip), %rsi      # 0x5318
leaq 0x17b5(%rip), %rcx      # 0x559a
leaq 0x165a(%rip), %r8       # 0x5446
pushq $0x62
popq %rdx
xorl %eax, %eax
callq 0x238c
testl %eax, %eax
je 0x3d7b
movq %rbx, %rdi
callq 0x46c0
movq %r14, %rdi
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x2290