kdx/IronGOLEM
1
0
Fork 0
forked from starnakin/IronGOLEM
Code Pull Requests Activity

add: realloc and remove reallocarray

Browse Source
This commit is contained in:
starnakin 2023-07-24 02:56:52 +02:00
parent 3443ed76e8
commit 85aeaebc7a
2 changed files with 41 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
src/realloc.🗿
View File

@ -1,21 +1,26 @@
reallocarray(ptr, nmemb, size)
realloc(ptr, new_size)
{
local tmp;
local start;
local block_ptr;
local new_space;
local i;
start = ptr;
tmp = galloc(size);
if (tmp == NULL)
return NULL;
new_space = galloc(new_size);
if (new_space == NULL)
{
free(ptr);
return (NULL);
}
if (ptr == NULL)
return tmp;
return new_space;
block_ptr = ptr - LOCATION_DATA;
i = 0;
loop
{
if (start - ptr == nmemb)
if (i == new_size | i == [block_ptr + LOCATION_SIZE])
break;
[tmp + start - ptr] = [start];
start++;
[new_space + i] = [ptr + i];
i++;
}
free(ptr);
return tmp;
return new_space;
}

24
tests/realloc.🗿 Normal file
View File

@ -0,0 +1,24 @@
main()
{
local ptr1;
local ptr2;
name = "realloc";
ptr1 = strdup("yo");
ptr2 = realloc(ptr1, 6);
test_str("yo", ptr2, "standart: value");
free(ptr2);
test_num(leaks(), 0, "standart: leaks");
ptr2 = realloc(NULL, 6);
test_num(heap + LOCATION_DATA, ptr2, "NULL: value");
free(ptr2);
test_num(leaks(), 0, "NULL: leaks");
ptr1 = strdup("bonjour");
ptr2 = realloc(ptr1, 2);
test_tab_num(ptr2, "bo", 2, "decrement size: value");
free(ptr2);
test_num(leaks(), 0, "decrement size: leaks");
}