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/table_data_structure.pl
+++ b/src/lib/tabling/table_data_structure.pl
@@ -56,6 +56,7 @@
 :- use_module(library(tabling/batched_worklist)).

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

@@ -63,6 +64,10 @@

 verify_attributes(_, _, []).

+attribute_goals(X) -->
+    { put_atts(X, -table_status(_)),
+      put_atts(X, -newly_created_table_identifiers(_)) }.
+
 % This file defines the table datastructure.
 %
 % The table datastructure contains the following sub-structures: