+ removed superfluous GC-protects

This commit is contained in:
eknauel 2004-02-16 08:36:18 +00:00
parent c3febf605a
commit ec7a66d221
1 changed files with 3 additions and 3 deletions

View File

@ -53,10 +53,10 @@ char** ffit_extract_list_of_strings(s48_value list)
{ {
char **a; char **a;
int l, i; int l, i;
s48_value res, e; s48_value e;
S48_DECLARE_GC_PROTECT(3); S48_DECLARE_GC_PROTECT(2);
S48_GC_PROTECT_3(list, res, e); S48_GC_PROTECT_2(list, e);
l = length_scheme_list(list); l = length_scheme_list(list);
if ((a = (char **) calloc(l + 1, sizeof(char *))) == NULL) if ((a = (char **) calloc(l + 1, sizeof(char *))) == NULL)