generate known atoms and functors automatically

2008-12-23 01:53:52 +00:00
parent 8efcdf7eaa
commit a8ac9bfb43
34 changed files with 2180 additions and 1003 deletions
--- a/C/utilpreds.c
+++ b/C/utilpreds.c
@@ -2301,8 +2301,8 @@ camacho_dum(void)

  /* build output list */

-  t1 = MkAtomTerm(Yap_LookupAtom("[]"));
-      t2 = MkPairTerm(MkIntegerTerm(max), t1);
+  t1 = TermNil;
+  t2 = MkPairTerm(MkIntegerTerm(max), t1);

  return(Yap_unify(t2, ARG1));
 }