]> Repositorios git - scryer-prolog.git/commitdiff
FIXED: meta_predicate/1 declaration for tmember_t/3.
authorMarkus Triska <[email protected]>
Sat, 20 Nov 2021 21:38:27 +0000 (22:38 +0100)
committerMarkus Triska <[email protected]>
Sat, 20 Nov 2021 21:38:27 +0000 (22:38 +0100)
src/lib/reif.pl

index f278e20b2412142aec46ba8f267a6e90bdba0d69..af6713e97c1a99e171b14a354cadc4528c7d54c3 100644 (file)
@@ -77,7 +77,7 @@ i_memberd_t([X|Xs], E, T) :-
 tmember(P_2, [X|Xs]) :-
    if_( call(P_2, X), true, tmember(P_2, Xs) ).
 
-:- meta_predicate tmember_t(1, ?).
+:- meta_predicate(tmember_t(2, ?, ?)).
 
 tmember_t(P_2, [X|Xs], T) :-
    if_( call(P_2, X), T = true, tmember_t(P_2, Xs, T) ).