some_recordedp never gets a third argument bound

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@726 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2002-12-11 16:08:35 +00:00
parent e4185f145c
commit 910e50d980
3 changed files with 11 additions and 23 deletions

View File

@@ -578,7 +578,7 @@ predicate_property(Pred,Prop) :-
\+ '$undefined'(P,M).
'$predicate_property'(P,M,_,meta_predicate(P)) :-
functor(P,Na,Ar),
user:'$meta_predicate'(M,Na,Ar,P).
'$meta_predicate'(M,Na,Ar,P).
'$predicate_property'(P,M,_,multifile) :-
'$is_multifile'(P,M).
'$predicate_property'(P,Mod,M,imported_from(Mod)) :-