delete freeze attribute in freeze::attribute_goals//1

2019-12-01 14:43:27 -07:00
parent 9b71866b54
commit 406d3520f1
1 changed files with 2 additions and 1 deletions
--- a/src/prolog/lib/freeze.pl
+++ b/src/prolog/lib/freeze.pl
@@ -22,5 +22,6 @@ freeze(X, Goal) :-
    Fresh = X.

 attribute_goals(Var) -->
-    { get_atts(Var, frozen(Goals)) },
+    { get_atts(Var, frozen(Goals)),
+      put_atts(Var, -frozen(_)) },
    [freeze(Var, Goals)].