remove tabling attributes in each module's attribute_goals//1 (#1825)

2023-06-27 10:30:55 -06:00
parent a6522d6317
commit aa65287c3b
6 changed files with 31 additions and 0 deletions
--- a/src/lib/tabling/global_worklist.pl
+++ b/src/lib/tabling/global_worklist.pl
@@ -9,12 +9,15 @@
 	  ]).

 :- use_module(library(atts)).
+:- use_module(library(dcgs)).
 :- use_module(library(iso_ext)).

 :- attribute table_global_worklist/1.

 verify_attributes(_, _, []).

+attribute_goals(X) --> { put_atts(X, -table_global_worklist(_)) }.
+
 put_new_global_worklist :-
  (  bb_get(table_global_worklist_initialized, _) ->
     true