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/attvar.c
+++ b/C/attvar.c
@@ -837,7 +837,7 @@ static Int
 p_swi_all_atts(void) {
  /* receive a variable in ARG1 */
  Term inp = Deref(ARG1);
-  Functor attf = Yap_MkFunctor(Yap_LookupAtom("att"),3);
+  Functor attf = Yap_MkFunctor(AtomAtt1,3);

  /* if this is unbound, ok */
  if (IsVarTerm(inp)) {