fix apply_macros calling maplist (not that it is very much used, most
of always will go through expand_macros).
This commit is contained in:
parent
23e258bdd4
commit
eef4b3cad2
|
@ -4,7 +4,7 @@
|
||||||
% Purpose: Macros to apply a predicate to all elements
|
% Purpose: Macros to apply a predicate to all elements
|
||||||
% of a list or to all sub-terms of a term.
|
% of a list or to all sub-terms of a term.
|
||||||
|
|
||||||
:- reexport(apply_macros, [selectlist/3,
|
:- reexport(library(maplist), [selectlist/3,
|
||||||
checklist/2,
|
checklist/2,
|
||||||
maplist/2,
|
maplist/2,
|
||||||
maplist/3,
|
maplist/3,
|
||||||
|
|
|
@ -12,13 +12,25 @@
|
||||||
% of a list or to all sub-terms of a term.
|
% of a list or to all sub-terms of a term.
|
||||||
|
|
||||||
|
|
||||||
:- module(maplist,
|
:- module(maplist, [selectlist/3,
|
||||||
[ maplist/2, % :Goal, +List
|
checklist/2,
|
||||||
maplist/3, % :Goal, ?List1, ?List2
|
maplist/2, % :Goal, +List
|
||||||
maplist/4, % :Goal, ?List1, ?List2, ?List3
|
maplist/3, % :Goal, ?List1, ?List2
|
||||||
maplist/5, % :Goal, ?List1, ?List2, ?List3, List4
|
maplist/4, % :Goal, ?List1, ?List2, ?List
|
||||||
forall/2 % :Goal, :Goal
|
maplist/5, % :Goal, ?List1, ?List2, ?List3, List4
|
||||||
]).
|
convlist/3,
|
||||||
|
mapargs/3,
|
||||||
|
sumargs/4,
|
||||||
|
mapnodes/3,
|
||||||
|
checknodes/2,
|
||||||
|
sumlist/4,
|
||||||
|
sumnodes/4,
|
||||||
|
include/3,
|
||||||
|
exclude/3,
|
||||||
|
partition/4,
|
||||||
|
partition/5
|
||||||
|
]).
|
||||||
|
|
||||||
|
|
||||||
:- meta_predicate
|
:- meta_predicate
|
||||||
selectlist(:,+,-),
|
selectlist(:,+,-),
|
||||||
|
|
Reference in New Issue