fix access to null pointer.

2015-08-18 14:30:00 -05:00 · 2015-08-18 14:30:00 -05:00 · 2266bb9826
commit 2266bb9826
parent 56a3fc5651
1 changed files with 2 additions and 0 deletions
--- a/C/args.c
+++ b/C/args.c
@ -68,6 +68,8 @@ Yap_ArgListToVector (Term listl, const param_t *def, int n)
 	return NULL;
      }
      xarg *na = matchKey( NameOfFunctor( f ), a, n, def);
+      if (!na)
+	return NULL;
      na->used = 1;
      na->tvalue = ArgOfTerm(1, hd);      
    } else {