From: Markus Triska Date: Sat, 20 Nov 2021 21:37:59 +0000 (+0100) Subject: FIXED: meta_predicate/1 declaration for tmember/2. X-Git-Tag: v0.9.0~27^2~5 X-Git-Url: https://git.sagredo.dev/?a=commitdiff_plain;h=2be8ed886b1478cc7a3d8b09b43edcde38d3f339;p=scryer-prolog.git FIXED: meta_predicate/1 declaration for tmember/2. --- diff --git a/src/lib/reif.pl b/src/lib/reif.pl index 07992244..f278e20b 100644 --- a/src/lib/reif.pl +++ b/src/lib/reif.pl @@ -72,7 +72,7 @@ i_memberd_t([], _, false). i_memberd_t([X|Xs], E, T) :- if_( X = E, T = true, i_memberd_t(Xs, E, T) ). -:- meta_predicate tmember(1, ?). +:- meta_predicate(tmember(2, ?)). tmember(P_2, [X|Xs]) :- if_( call(P_2, X), true, tmember(P_2, Xs) ).