Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-14 08:17:35 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Remove data param

Browse source
This commit is contained in:
Justin Ethier 2018-12-05 17:39:02 -05:00
parent de5d83f21a
commit 87267600d2
2 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
include/cyclone/runtime.h
View file

@ -397,9 +397,9 @@ object Cyc_fast_sum(void *data, object ptr, object x, object y);
object Cyc_fast_sub(void *data, object ptr, object x, object y);
object Cyc_fast_mul(void *data, object ptr, object x, object y);
object Cyc_fast_div(void *data, object ptr, object x, object y);
object Cyc_fast_list_2(void *data, object ptr, object x, object y);
object Cyc_fast_list_3(void *data, object ptr, object a1, object a2, object a3);
object Cyc_fast_list_4(void *data, object ptr, object a1, object a2, object a3, object a4);
object Cyc_fast_list_2(object ptr, object x, object y);
object Cyc_fast_list_3(object ptr, object a1, object a2, object a3);
object Cyc_fast_list_4(object ptr, object a1, object a2, object a3, object a4);
object Cyc_bit_unset(void *data, object n1, object n2);
object Cyc_bit_set(void *data, object n1, object n2);
object Cyc_num_op_va_list(void *data, int argc,

6
runtime.c
View file

@ -1259,7 +1259,7 @@ list assoc_cdr(void *data, object x, list l)
}
/* END member and assoc */
object Cyc_fast_list_2(void *data, object ptr, object a1, object a2)
object Cyc_fast_list_2(object ptr, object a1, object a2)
{
list_2_type *l = (list_2_type *)ptr;
set_pair( ((pair)(&(l->b))), a2, NULL);
@ -1267,7 +1267,7 @@ object Cyc_fast_list_2(void *data, object ptr, object a1, object a2)
return ptr;
}
object Cyc_fast_list_3(void *data, object ptr, object a1, object a2, object a3)
object Cyc_fast_list_3(object ptr, object a1, object a2, object a3)
{
list_3_type *l = (list_3_type *)ptr;
set_pair( ((pair)(&(l->c))), a3, NULL);
@ -1276,7 +1276,7 @@ object Cyc_fast_list_3(void *data, object ptr, object a1, object a2, object a3)
return ptr;
}
object Cyc_fast_list_4(void *data, object ptr, object a1, object a2, object a3, object a4)
object Cyc_fast_list_4(object ptr, object a1, object a2, object a3, object a4)
{
list_4_type *l = (list_4_type *)ptr;
set_pair( ((pair)(&(l->d))), a4, NULL);