DiamondNether90/cground
1
0
Fork 0
forked from ground/ground
Code Pull Requests Activity

added hashmaps and fixed some small issues with lists

Browse Source
This commit is contained in:
SpookyDervish
2026-04-11 19:47:12 +10:00
parent a1ad1fe139
commit 8a3093c30f
4 changed files with 184 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

65
libs/collections/list.c
View File

@@ -6,7 +6,6 @@
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <uthash.h>
const uint8_t STARTING_ELEMENTS = 2;
@@ -25,9 +24,9 @@ GroundValue appendToListStruct(GroundScope* scope, List args) {
ERROR("A field called \"memSize\" was not found", "FieldNotFound");
}
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -77,9 +76,9 @@ GroundValue listStructAt(GroundScope* scope, List args) {
ERROR(buffer, "OutOfBounds");
}
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -102,9 +101,9 @@ GroundValue clearListStruct(GroundScope* scope, List args) {
ERROR("A field called \"memSize\" was not found", "FieldNotFound");
}
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundVariable* capacityField = groundFindVariable(scope, "capacity");
@@ -112,8 +111,13 @@ GroundValue clearListStruct(GroundScope* scope, List args) {
ERROR("A field called \"capacity\" was not found", "FieldNotFound");
}
GroundValue* newBuffer = calloc(STARTING_ELEMENTS, sizeof(GroundValue));
if (newBuffer == NULL) {
ERROR("Failed to allocate memory when clearing list!", "MemoryAllocationFailed");
}
sizeField->value.data.intVal = 0;
ptrField->value.data.intVal = (int64_t)calloc(STARTING_ELEMENTS, sizeof(GroundValue));
ptrField->value.data.intVal = (int64_t)newBuffer;
capacityField->value.data.intVal = STARTING_ELEMENTS;
memSizeField->value.data.intVal = sizeof(GroundValue) * STARTING_ELEMENTS;
@@ -138,9 +142,9 @@ GroundValue insertIntoListStruct(GroundScope* scope, List args) {
ERROR("A field called \"memSize\" was not found", "FieldNotFound");
}
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -204,9 +208,9 @@ GroundValue listStructDelete(GroundScope* scope, List args) {
ERROR("A field called \"memSize\" was not found", "FieldNotFound");
}
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -270,9 +274,9 @@ GroundValue listStructSet(GroundScope* scope, List args) {
}
int64_t size = sizeField->value.data.intVal;
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -333,9 +337,9 @@ GroundValue listStructContains(GroundScope* scope, List args) {
}
int64_t size = sizeField->value.data.intVal;
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -361,9 +365,9 @@ GroundValue reverseListStruct(GroundScope* scope, List args) {
}
int64_t capacity = capacityField->value.data.intVal;
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -389,9 +393,9 @@ GroundValue findListStruct(GroundScope* scope, List args) {
}
int64_t size = sizeField->value.data.intVal;
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -413,9 +417,9 @@ GroundValue reserveListStruct(GroundScope* scope, List args) {
}
int64_t capacity = capacityField->value.data.intVal;
GroundVariable* ptrField = groundFindVariable(scope, "__ptr");
GroundVariable* ptrField = groundFindVariable(scope, "private_ptr");
if (ptrField == NULL) {
ERROR("A field called \"__ptr\" was not found", "FieldNotFound");
ERROR("A field called \"private_ptr\" was not found", "FieldNotFound");
}
GroundValue* items = (GroundValue*)ptrField->value.data.intVal;
@@ -447,20 +451,19 @@ GroundValue createListStruct() {
groundAddFieldToStruct(&listStruct, "size", groundCreateValue(INT, 0)); // number of elements
groundAddFieldToStruct(&listStruct, "memSize", groundCreateValue(INT, sizeof(GroundValue) * STARTING_ELEMENTS)); // number of bytes allocated
groundAddFieldToStruct(&listStruct, "capacity", groundCreateValue(INT, STARTING_ELEMENTS)); // number of elements that can fit in the currently allocated space
groundAddFieldToStruct(&listStruct, "private_ptr", groundCreateValue(INT, items)); // pointer to internal list struct
groundAddFieldToStruct(&listStruct, "private_ptr", groundCreateValue(INT, items)); // pointer to internal list struct
groundAddFunctionToStruct(&listStruct, "append", appendToListStruct, INT, 1, INT, "value"); // append item to end of list
groundAddFunctionToStruct(&listStruct, "string", listStructToString, STRING, 0); // convert list to string
groundAddFunctionToStruct(&listStruct, "insert", insertIntoListStruct, INT, 2, INT, "value", INT, "index"); // insert value at index
groundAddFunctionToStruct(&listStruct, "delete", listStructDelete, INT, 1, INT, "index"); // delete value at index
groundAddFunctionToStruct(&listStruct, "append", appendToListStruct, INT, 1, ANY, "value"); // append item to end of list
groundAddFunctionToStruct(&listStruct, "insert", insertIntoListStruct, INT, 2, ANY, "value", INT, "index"); // insert value at index
groundAddFunctionToStruct(&listStruct, "remove", listStructDelete, INT, 1, INT, "index"); // delete value at index
groundAddFunctionToStruct(&listStruct, "at", listStructAt, INT, 1, INT, "index"); // get value at index
groundAddFunctionToStruct(&listStruct, "clear", clearListStruct, INT, 0); // clear list
groundAddFunctionToStruct(&listStruct, "set", listStructSet, INT, 2, INT, "value", INT, "index"); // replace a value at an index
groundAddFunctionToStruct(&listStruct, "set", listStructSet, INT, 2, ANY, "value", INT, "index"); // replace a value at an index
groundAddFunctionToStruct(&listStruct, "isEmpty", listStructIsEmpty, BOOL, 0); // returns true if list is empty, otherwise false
groundAddFunctionToStruct(&listStruct, "contains", listStructContains, BOOL, 1, INT, "value"); // returns true if value is in list
groundAddFunctionToStruct(&listStruct, "contains", listStructContains, BOOL, 1, ANY, "value"); // returns true if value is in list
groundAddFunctionToStruct(&listStruct, "reverse", reverseListStruct, INT, 0); // return list struct in reverse order
groundAddFunctionToStruct(&listStruct, "find", findListStruct, INT, 1, INT, "value"); // return index of value in list, if not found, returns -1
groundAddFunctionToStruct(&listStruct, "reserve", reserveListStruct, BOOL, 1, INT, "amount"); // ensure list capacity >= amount. returns true if the list's capacity was expanded
groundAddFunctionToStruct(&listStruct, "find", findListStruct, INT, 1, ANY, "value"); // return index of value in list, if not found, returns -1
groundAddFunctionToStruct(&listStruct, "reserve", reserveListStruct, BOOL, 1, INT, "amount"); // ensure list capacity >= amount. returns true if the list's capacity was expanded
return groundCreateValue(STRUCTVAL, listStruct);
}