FIXED: meta_predicate/1 declaration for tpartition/4.
This addresses #1101.
This commit is contained in:
@@ -38,7 +38,7 @@ i_tfilter([E|Es], C_2, Fs0) :-
|
|||||||
if_(call(C_2, E), Fs0 = [E|Fs], Fs0 = Fs),
|
if_(call(C_2, E), Fs0 = [E|Fs], Fs0 = Fs),
|
||||||
i_tfilter(Es, C_2, Fs).
|
i_tfilter(Es, C_2, Fs).
|
||||||
|
|
||||||
:- meta_predicate tpartition(1, ?, ?).
|
:- meta_predicate(tpartition(2, ?, ?, ?)).
|
||||||
|
|
||||||
tpartition(P_2, Xs, Ts, Fs) :-
|
tpartition(P_2, Xs, Ts, Fs) :-
|
||||||
i_tpartition(Xs, P_2, Ts, Fs).
|
i_tpartition(Xs, P_2, Ts, Fs).
|
||||||
|
|||||||
Reference in New Issue
Block a user