+ removed superfluous GC-protects
This commit is contained in:
parent
c3febf605a
commit
ec7a66d221
|
@ -53,10 +53,10 @@ char** ffit_extract_list_of_strings(s48_value list)
|
|||
{
|
||||
char **a;
|
||||
int l, i;
|
||||
s48_value res, e;
|
||||
S48_DECLARE_GC_PROTECT(3);
|
||||
s48_value e;
|
||||
S48_DECLARE_GC_PROTECT(2);
|
||||
|
||||
S48_GC_PROTECT_3(list, res, e);
|
||||
S48_GC_PROTECT_2(list, e);
|
||||
l = length_scheme_list(list);
|
||||
|
||||
if ((a = (char **) calloc(l + 1, sizeof(char *))) == NULL)
|
||||
|
|
Loading…
Reference in New Issue