small fixes

2011-05-20 23:56:12 +01:00
parent 6d4d2b5830
commit 55e2e6fe3a
7 changed files with 27 additions and 12 deletions
--- a/packages/CLPBN/clpbn/table.yap
+++ b/packages/CLPBN/clpbn/table.yap
@@ -96,7 +96,7 @@ clpbn_table(F/N,M) :-
 	Key =.. L1,
 	atom_concat(F, '___tabled', NF),
 	L2 = [_|Args],
-	S1 =.. [NF|Args],
+	_S1 =.. [NF|Args],
 	L0 = [_|OArgs],
 	S2 =.. [NF|OArgs],
 	asserta(clpbn_table(S, M, S2)),