add predicate indicator sequences to loader:add_predicate_declaration (#1586)
This commit is contained in:
@@ -393,6 +393,9 @@ add_predicate_declaration(Handler, Module:Name/Arity) :-
|
|||||||
call(Handler, Module, Name, Arity).
|
call(Handler, Module, Name, Arity).
|
||||||
add_predicate_declaration(Handler, [PI|PIs]) :-
|
add_predicate_declaration(Handler, [PI|PIs]) :-
|
||||||
maplist(loader:add_predicate_declaration(Handler), [PI|PIs]).
|
maplist(loader:add_predicate_declaration(Handler), [PI|PIs]).
|
||||||
|
add_predicate_declaration(Handler, (PI, PIs)) :-
|
||||||
|
add_predicate_declaration(Handler, PI),
|
||||||
|
add_predicate_declaration(Handler, PIs).
|
||||||
|
|
||||||
add_dynamic_predicate(Evacuable, Module, Name, Arity) :-
|
add_dynamic_predicate(Evacuable, Module, Name, Arity) :-
|
||||||
'$add_dynamic_predicate'(Module, Name, Arity, Evacuable).
|
'$add_dynamic_predicate'(Module, Name, Arity, Evacuable).
|
||||||
|
|||||||
Reference in New Issue
Block a user