[GRASS-SVN] r35945 - grass/branches/develbranch_6/lib/vector/Vlib

[svn_grass at osgeo.org]

Author: hamish
Date: 2009-02-19 06:42:55 -0500 (Thu, 19 Feb 2009)
New Revision: 35945

Modified:
   grass/branches/develbranch_6/lib/vector/Vlib/sindex.c
Log:
add back G_percent() which was removed circa r34754. The fn can minutes to complete.

Modified: grass/branches/develbranch_6/lib/vector/Vlib/sindex.c
===================================================================
--- grass/branches/develbranch_6/lib/vector/Vlib/sindex.c	2009-02-19 11:13:03 UTC (rev 35944)
+++ grass/branches/develbranch_6/lib/vector/Vlib/sindex.c	2009-02-19 11:42:55 UTC (rev 35945)
@@ -161,6 +161,8 @@
 
     /* Nodes */
     for (i = 1; i <= plus->n_nodes; i++) {
+	G_percent(i, total, 3);
+
 	Node = plus->Node[i];
 	if (!Node)
 	    G_fatal_error(_("BUG (Vect_build_sidx_from_topo): node does not exist"));
@@ -171,6 +173,8 @@
     /* Lines */
     done = plus->n_nodes;
     for (i = 1; i <= plus->n_lines; i++) {
+	G_percent(done + i, total, 3);
+
 	Line = plus->Line[i];
 	if (!Line)
 	    G_fatal_error(_("BUG (Vect_build_sidx_from_topo): line does not exist"));
@@ -188,6 +192,8 @@
     /* Areas */
     done += plus->n_lines;
     for (i = 1; i <= plus->n_areas; i++) {
+	G_percent(done + i, total, 3);
+
 	Area = plus->Area[i];
 	if (!Area)
 	    G_fatal_error(_("BUG (Vect_build_sidx_from_topo): area does not exist"));
@@ -205,6 +211,8 @@
     /* Isles */
     done += plus->n_areas;
     for (i = 1; i <= plus->n_isles; i++) {
+	G_percent(done + i, total, 3);
+
 	Isle = plus->Isle[i];
 	if (!Isle)
 	    G_fatal_error(_("BUG (Vect_build_sidx_from_topo): isle does not exist"));