FIXED: meta_predicate/1 directive for call_nth/2.

This addresses #1021.
2021-11-11 19:26:27 +01:00
parent 1d2a838717
commit e9b4a99c8f
1 changed files with 2 additions and 0 deletions
--- a/src/lib/iso_ext.pl
+++ b/src/lib/iso_ext.pl
@@ -183,6 +183,8 @@ partial_string_tail(String, Tail) :-
 :- dynamic(i_call_nth_nesting/2).
 :- dynamic(i_call_nth_counter/1).

+:- meta_predicate(call_nth(0, ?)).
+
 call_nth(Goal, N) :-
    can_be(integer, N),
    (   integer(N), N =< 0,