wrap support code in modules

2020-05-02 21:26:36 -06:00
parent 99f66200f7
commit 989bed88fe
2 changed files with 4 additions and 0 deletions
--- a/src/prolog/machine/attributed_variables.pl
+++ b/src/prolog/machine/attributed_variables.pl
@@ -1,3 +1,5 @@
+:- module('$atts', []).
+
 driver(Vars, Values) :-
    iterate(Vars, Values, ListOfListsOfGoalLists),
    !,
--- a/src/prolog/machine/project_attributes.pl
+++ b/src/prolog/machine/project_attributes.pl
@@ -1,3 +1,5 @@
+:- module('$project_atts', [copy_term/3]).
+
 '$attribute_goals_driver'(QueryVars, AttrVars) :-
    gather_modules(AttrVars, Modules0, _),
    sort(Modules0, Modules),