[Gnucash-changes] r14136 - gnucash/trunk - More of the patch from Bill Nottingham for compiling with guile 1.8.

[David Hampton]

Author: hampton
Date: 2006-05-19 19:30:58 -0400 (Fri, 19 May 2006)
New Revision: 14136
Trac: http://svn.gnucash.org/trac/changeset/14136

Modified:
   gnucash/trunk/ChangeLog
   gnucash/trunk/src/engine/engine-helpers.c
Log:
More of the patch from Bill Nottingham for compiling with guile 1.8.


Modified: gnucash/trunk/ChangeLog
===================================================================
--- gnucash/trunk/ChangeLog	2006-05-18 15:35:10 UTC (rev 14135)
+++ gnucash/trunk/ChangeLog	2006-05-19 23:30:58 UTC (rev 14136)
@@ -1,5 +1,10 @@
-2006-05-17  Mike Alexander  <mta at arbortext.com>
+2006-05-19  David Hampton  <hampton at employees.org>
 
+	* src/engine/engine-helpers.c: More of the patch from Bill
+	Nottingham for compiling with guile 1.8.
+
+2006-05-17  Mike Alexander  <mta at umich.edu>
+
 	* From bugzilla #342153.
         * src/engine/cap-gains.c (finder_helper): Don't add a split with
         the wrong sign to a lot and don't add any split to a lot that is

Modified: gnucash/trunk/src/engine/engine-helpers.c
===================================================================
--- gnucash/trunk/src/engine/engine-helpers.c	2006-05-18 15:35:10 UTC (rev 14135)
+++ gnucash/trunk/src/engine/engine-helpers.c	2006-05-19 23:30:58 UTC (rev 14136)
@@ -1686,8 +1686,6 @@
 
   if (!q) return SCM_BOOL_F;
 
-  ++scm_block_gc;
-
   /* terms */
   pair = scm_cons (gnc_query_terms2scm (qof_query_get_terms (q)), SCM_EOL);
   pair = scm_cons (scm_str2symbol ("terms"), pair);
@@ -1723,7 +1721,6 @@
 
   /* Reverse this list; tag it as 'query-v2' */
   pair = scm_reverse (query_scm);
-  --scm_block_gc;
   return scm_cons (scm_str2symbol ("query-v2"), pair);
 }
 
@@ -1928,8 +1925,6 @@
   gboolean si1 = TRUE, si2 = TRUE, si3 = TRUE;
   int max_results = -1;
 
-  ++scm_block_gc;
-
   while (!SCM_NULLP (query_scm))
   {
     const gchar *symbol;
@@ -2008,8 +2003,6 @@
     }
   }
 
-  --scm_block_gc;
-
   if (ok && search_for) {
     qof_query_search_for (q, search_for);
     qof_query_set_sort_order (q, sp1, sp2, sp3);