6.2 fix to load_foreign atom.

2012-06-11 22:11:30 +01:00
parent c6ececc21a
commit f6de18cb09
4 changed files with 7 additions and 5 deletions
--- a/packages/CLPBN/clpbn/ground_factors.yap
+++ b/packages/CLPBN/clpbn/ground_factors.yap
@@ -61,6 +61,7 @@ ground_all_keys([], _).
 ground_all_keys([V|GVars], AllKeys) :-
 	clpbn:get_atts(V,[key(Key)]), 
 	\+ ground(Key), !,
+wroteln(g:Key),
 	member(Key, AllKeys),
 	ground_all_keys(GVars, AllKeys).
 ground_all_keys([_V|GVars], AllKeys) :-