fix syntax error in current_predicate
This commit is contained in:
parent
02893cc83f
commit
7f51339a97
@ -928,7 +928,7 @@ system_predicate(P) :-
|
||||
(
|
||||
'$current_predicate'(M,A,Arity)
|
||||
->
|
||||
'$ifunctor'(T,A,Arity)
|
||||
'$ifunctor'(T,A,Arity),
|
||||
'$pred_exists'(T,M)
|
||||
% ;
|
||||
% '$current_predicate'(prolog,A,Arity)
|
||||
|
Reference in New Issue
Block a user