diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

atom versus atomic

Browse Source
This commit is contained in:
Vítor Santos Costa 2015-11-05 15:59:49 +00:00
parent 7fd6167c50
commit 9db87d1da4
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
packages/ProbLog/problog_learning.yap
View File

@ -636,7 +636,6 @@ init_one_query(QueryID,Query,Type) :-
assertz(query_md5(QueryID,Query_MD5,Type)) assertz(query_md5(QueryID,Query_MD5,Type))
) )
); );
true true
),!, ),!,
garbage_collect. garbage_collect.
@ -811,8 +810,8 @@ my_load_intern(query_probability(QueryID,Prob),Handle,QueryID) :-
my_load_intern(X,Handle,QueryID). my_load_intern(X,Handle,QueryID).
my_load_intern(query_gradient(QueryID,XFactID,Type,Value),Handle,QueryID) :- my_load_intern(query_gradient(QueryID,XFactID,Type,Value),Handle,QueryID) :-
!, !,
atomic_concat(x,StringFactID,XFactID), atomic_concat(x,FactID,XFactID),
atom_number(StringFactID,FactID), % atom_number(StringFactID,FactID),
assertz(query_gradient_intern(QueryID,FactID,Type,Value)), assertz(query_gradient_intern(QueryID,FactID,Type,Value)),
read(Handle,X), read(Handle,X),
my_load_intern(X,Handle,QueryID). my_load_intern(X,Handle,QueryID).