From: Markus Triska <triska@metalevel.at>
Date: Thu, 11 Nov 2021 18:26:27 +0000 (+0100)
Subject: FIXED: meta_predicate/1 directive for call_nth/2.
X-Git-Tag: v0.9.0~32^2~1
X-Git-Url: https://git.sagredo.dev/?a=commitdiff_plain;h=e9b4a99c8f587de5de96cf2cebdaaf4c16b5a961;p=scryer-prolog.git

FIXED: meta_predicate/1 directive for call_nth/2.

This addresses #1021.
---

diff --git a/src/lib/iso_ext.pl b/src/lib/iso_ext.pl
index be44099f..7ddc6bb7 100644
--- 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,