indenting
This commit is contained in:
parent
832b2258c8
commit
0c88265943
@ -1041,6 +1041,9 @@ true if source for the predicate is available.
|
|||||||
Number of clauses in the predicate definition. Always one if external
|
Number of clauses in the predicate definition. Always one if external
|
||||||
or built-in.
|
or built-in.
|
||||||
|
|
||||||
|
+ `notrace`
|
||||||
|
The predicate definition cannot be traced.
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
*/
|
*/
|
||||||
@ -1110,6 +1113,10 @@ predicate_property(Pred,Prop) :-
|
|||||||
'$number_of_clauses'(P,Mod,NCl).
|
'$number_of_clauses'(P,Mod,NCl).
|
||||||
'$predicate_property'(P,Mod,_,file(F)) :-
|
'$predicate_property'(P,Mod,_,file(F)) :-
|
||||||
'$owner_file'(P,Mod,F).
|
'$owner_file'(P,Mod,F).
|
||||||
|
'$predicate_property'(P,Mod,_,notrace) :-
|
||||||
|
'$owner_file'(P,Mod,F).
|
||||||
|
'$flags'(P,Mod,F,F),
|
||||||
|
F /\ 0x400000000 =\= 0.
|
||||||
|
|
||||||
|
|
||||||
/**
|
/**
|
||||||
@ -1314,4 +1321,3 @@ clause_property(ClauseRef, predicate(PredicateIndicator)) :-
|
|||||||
/**
|
/**
|
||||||
@}
|
@}
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user