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/double_linked_list.pl
+++ b/src/lib/tabling/double_linked_list.pl
@@ -49,9 +49,15 @@
 	  ]).

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

 :- attribute dll_element/1, dll_next/1, dll_prev/1.

+attribute_goals(X) -->
+     { put_atts(X, -dll_element(_)),
+       put_atts(X, -dll_next(_)),
+       put_atts(X, -dll_prev(_)) }.
+
 % A circular double linked list
 % =============================