From c0f1fdc432449f0a0086402d0b31bfc012ca453c Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Sat, 19 Mar 2011 15:26:11 +0000
Subject: [PATCH] garbage collect blob

---
 C/agc.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/C/agc.c b/C/agc.c
index c1cd117e6..4949ff5ee 100755
--- a/C/agc.c
+++ b/C/agc.c
@@ -427,6 +427,11 @@ clean_atoms(void)
     HashPtr++;
   }
   clean_atom_list(&INVISIBLECHAIN);
+  {
+    AtomHashEntry list;
+    list.Entry = SWI_Blobs;
+    clean_atom_list(&list);
+  }
 }
 
 static void