acyclic_term/1 should be builtin(ISO WG17, UD #174).
This commit is contained in:
parent
cf3cb21fd7
commit
0449bf1e7f
@ -1009,9 +1009,9 @@ Yap_InitUnify(void)
|
|||||||
{
|
{
|
||||||
Term cm = CurrentModule;
|
Term cm = CurrentModule;
|
||||||
Yap_InitCPred("unify_with_occurs_check", 2, p_ocunify, SafePredFlag);
|
Yap_InitCPred("unify_with_occurs_check", 2, p_ocunify, SafePredFlag);
|
||||||
|
Yap_InitCPred("acyclic_term", 1, p_acyclic, SafePredFlag|TestPredFlag);
|
||||||
CurrentModule = TERMS_MODULE;
|
CurrentModule = TERMS_MODULE;
|
||||||
Yap_InitCPred("cyclic_term", 1, p_cyclic, SafePredFlag|TestPredFlag);
|
Yap_InitCPred("cyclic_term", 1, p_cyclic, SafePredFlag|TestPredFlag);
|
||||||
Yap_InitCPred("acyclic_term", 1, p_acyclic, SafePredFlag|TestPredFlag);
|
|
||||||
Yap_InitCPred("protected_unifiable", 3, p_unifiable, 0);
|
Yap_InitCPred("protected_unifiable", 3, p_unifiable, 0);
|
||||||
CurrentModule = cm;
|
CurrentModule = cm;
|
||||||
}
|
}
|
||||||
|
12
docs/yap.tex
12
docs/yap.tex
@ -3359,6 +3359,12 @@ Same as @code{variant/2}, succeeds if @var{Term1} and @var{Term2} are variant te
|
|||||||
Succeed if @var{Submuser} subsumes @var{Subsuned} but does not bind any
|
Succeed if @var{Submuser} subsumes @var{Subsuned} but does not bind any
|
||||||
variable in @var{Subsumer}.
|
variable in @var{Subsumer}.
|
||||||
|
|
||||||
|
@item acyclic_term(?@var{Term})
|
||||||
|
@findex cyclic_term/1
|
||||||
|
@syindex cyclic_term/1
|
||||||
|
@cnindex cyclic_term/1
|
||||||
|
Succeed if the argument @var{Term} is an acyclic term.
|
||||||
|
|
||||||
|
|
||||||
@end table
|
@end table
|
||||||
|
|
||||||
@ -11584,12 +11590,6 @@ efficiency. They are available through the
|
|||||||
|
|
||||||
@table @code
|
@table @code
|
||||||
|
|
||||||
@item acyclic_term(?@var{Term})
|
|
||||||
@findex cyclic_term/1
|
|
||||||
@syindex cyclic_term/1
|
|
||||||
@cnindex cyclic_term/1
|
|
||||||
Succeed if the argument @var{Term} is an acyclic term.
|
|
||||||
|
|
||||||
@item cyclic_term(?@var{Term})
|
@item cyclic_term(?@var{Term})
|
||||||
@findex cyclic_term/1
|
@findex cyclic_term/1
|
||||||
@syindex cyclic_term/1
|
@syindex cyclic_term/1
|
||||||
|
@ -24,7 +24,6 @@
|
|||||||
subsumes/2,
|
subsumes/2,
|
||||||
subsumes_chk/2,
|
subsumes_chk/2,
|
||||||
cyclic_term/1,
|
cyclic_term/1,
|
||||||
acyclic_term/1,
|
|
||||||
variable_in_term/2,
|
variable_in_term/2,
|
||||||
variables_within_term/3,
|
variables_within_term/3,
|
||||||
new_variables_in_term/3
|
new_variables_in_term/3
|
||||||
|
Reference in New Issue
Block a user