make ground.yap use new C-code.
This commit is contained in:
parent
d2c50b72c6
commit
d690ffdb18
@ -48,8 +48,6 @@ ground(Term) :-
|
||||
ground(ArgN),
|
||||
'$ground'(M, Term).
|
||||
|
||||
*/
|
||||
|
||||
numbervars(Term, M, N) :-
|
||||
'$variables_in_term'(Term, [], L),
|
||||
'$numbermarked_vars'(L, M, N).
|
||||
@ -62,3 +60,5 @@ numbervars(Term, M, N) :-
|
||||
M1 is M+1,
|
||||
'$numbermarked_vars'(L, M1, N).
|
||||
|
||||
*/
|
||||
|
||||
|
Reference in New Issue
Block a user