[Xsb-commits] CVS: XSB/emu tr_utils.c,1.177,1.178

[Terrance S. <ts...@us...>]

Update of /cvsroot/xsb/XSB/emu
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv5583

Modified Files:
	tr_utils.c 
Log Message:

Fixes a bug in certain cases of garbage collecting subsumptive tables.



Index: tr_utils.c
===================================================================
RCS file: /cvsroot/xsb/XSB/emu/tr_utils.c,v
retrieving revision 1.177
retrieving revision 1.178
diff -u -r1.177 -r1.178
--- tr_utils.c	29 Mar 2009 21:40:10 -0000	1.177
+++ tr_utils.c	7 Sep 2009 15:58:13 -0000	1.178
@@ -3179,7 +3179,7 @@
   if (action == CAN_RECLAIM) {
     delete_predicate_table(CTXTc tif,TRUE);
   }
-  else {
+  else if (TIF_Subgoals(tif)) {
     //        fprintf(stderr,"Delaying abolish of table in use: %s/%d\n",
     //        get_name(psc),get_arity(psc));
 #ifndef MULTI_THREAD