sforman
/
Thun
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Used "Artistic Style" (astyle) to check formatting.

This commit is contained in:
Simon Forman 2023-02-15 17:22:14 -08:00
parent 1256fb47d8
commit 10edbd0ee0
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
implementations/C/joy.c
View File

@ -54,19 +54,22 @@ JoyTypePtr JoyFalse = &JoyFalseVal;
void* void*
reallocate_function (void *ptr, __attribute__((unused)) size_t old_size, size_t new_size) { reallocate_function (void *ptr, __attribute__((unused)) size_t old_size, size_t new_size)
{
return GC_REALLOC(ptr, new_size); return GC_REALLOC(ptr, new_size);
} }
void void
deallocate_function (void *ptr, __attribute__((unused)) size_t size) { deallocate_function (void *ptr, __attribute__((unused)) size_t size)
{
GC_FREE(ptr); GC_FREE(ptr);
} }
void void
my_callback(GC_PTR void_obj, __attribute__((unused)) GC_PTR void_environment) { my_callback(GC_PTR void_obj, __attribute__((unused)) GC_PTR void_environment)
{
mpz_t *obj = (mpz_t*)void_obj; mpz_t *obj = (mpz_t*)void_obj;
mpz_clear(*obj); mpz_clear(*obj);
} }
@ -224,7 +227,8 @@ pop_list(JoyListPtr stack)
JoyList JoyList
newIntNode(void) { newIntNode(void)
{
JoyList node = newJoyList; JoyList node = newJoyList;
node->head = newJoyType; node->head = newJoyType;
node->head->kind = joyInt; node->head->kind = joyInt;