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/LGPL/PLStream/buildatoms
+++ b/LGPL/PLStream/buildatoms
@@ -11,7 +11,7 @@
 :- yap_flag(write_strings,on).

 main :-
-	file_filter('ATOMS','atoms.h',gen_decl).
+	file_filter('ATOMS','../H/atoms.h',gen_decl).

 gen_decl(Inp,Out) :-
 	split(Inp," 	",["A",Atom,String]), !,
@@ -30,6 +30,3 @@ counter(I) :-
 	I1 is I+1,
 	nb_setval(count,I1).

-
-	
-