diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

free memory

Browse Source
This commit is contained in:
Vítor Santos Costa 2015-11-05 16:39:34 +00:00
parent 4224382be1
commit 8ac1e23450
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
C/args.c
View File

@ -116,7 +116,8 @@ Yap_ArgListToVector (Term listl, const param_t *def, int n)
return NULL; return NULL;
} }
xarg *na = matchKey( NameOfFunctor( f ), a, n, def); xarg *na = matchKey( NameOfFunctor( f ), a, n, def);
if (!na) if (!na) {
free( a );
return NULL; return NULL;
na->used = 1; na->used = 1;
na->tvalue = ArgOfTerm(1, hd); na->tvalue = ArgOfTerm(1, hd);