andrew/libakstdlib
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Compare commits

base: andrew:trees
Branches Tags
andrew:main andrew:trees
..
compare: andrew:55c3e451a6fe1577191c61ca0589de98b5ac0b29
Branches Tags
andrew:main andrew:trees

2 Commits
trees ... 55c3e451a6

Author SHA1 Message Date
Andrew Kesterson
55c3e451a6 WIP. Tree searching function is written, DFS supported, BFS unimplemented. Started adding Doxygen blocks. 2026-06-22 08:16:19 -04:00
Andrew Kesterson
22414addd3 WIP 2026-06-02 12:42:21 -04:00
1 changed files with 12 additions and 18 deletions
Expand all files Collapse all files

30
src/stdlib.c
View File

@@ -184,18 +184,16 @@ akerr_ErrorContext AKERR_NOIGNORE *aksl_list_push(aksl_ListNode *list, aksl_List
FAIL_ZERO_RETURN(e, obj, AKERR_NULLPOINTER, "obj");
aksl_ListNode *slow = list;
aksl_ListNode *fast = list;
aksl_ListNode *tail = list;
do {
if ( fast != NULL && fast->next != NULL ) {
while ( slow->next != NULL || fast->next != NULL ) {
if ( fast->next != NULL ) {
fast = fast->next->next;
}
tail = slow;
slow = slow->next;
if ( fast != NULL && fast == slow) {
if ( fast == slow ) {
FAIL(e, AKERR_CIRCULAR_REFERENCE, "%p", list);
}
} while ( slow != NULL || (fast != NULL && fast->next != NULL) );
tail->next = obj;
}
slow->next = obj;
obj->next = NULL;
obj->prev = slow;
SUCCEED_RETURN(e);
@@ -205,12 +203,9 @@ akerr_ErrorContext AKERR_NOIGNORE *aksl_list_pop(aksl_ListNode *node)
{
PREPARE_ERROR(e);
FAIL_ZERO_RETURN(e, node, AKERR_NULLPOINTER, "node");
if ( node->prev != NULL ) {
node->prev->next = node->next;
}
if ( node->next != NULL ) {
node->next->prev = node->prev;
}
FAIL_ZERO_RETURN(e, node->prev, AKERR_NULLPOINTER, "node->prev");
node->prev->next = node->next;
node->next->prev = node->prev;
node->next = NULL;
node->prev = NULL;
SUCCEED_RETURN(e);
@@ -306,16 +301,15 @@ akerr_ErrorContext AKERR_NOIGNORE *aksl_list_iterate(aksl_ListNode *list, aksl_L
FAIL_ZERO_RETURN(e, iter, AKERR_NULLPOINTER, "iter");
aksl_ListNode *slow = list;
aksl_ListNode *fast = list;
aksl_ListNode *tail = list;
do {
if ( fast != NULL && fast->next != NULL ) {
while ( slow->next != NULL || fast->next != NULL ) {
if ( fast->next != NULL ) {
fast = fast->next->next;
}
PASS(e, iter(slow, data));
slow = slow->next;
if ( fast != NULL && fast == slow) {
if ( fast == slow && fast->next != NULL ) {
FAIL(e, AKERR_CIRCULAR_REFERENCE, "%p", list);
}
} while ( slow != NULL || (fast != NULL && fast->next != NULL) );
}
SUCCEED_RETURN(e);
}