[grisbi-cvs] grisbi/src gsb_real.c,1.78,1.79

[Pierre Biava]

Update of /cvsroot/grisbi/grisbi/src
In directory sfp-cvsdas-2.v30.ch3.sourceforge.com:/tmp/cvs-serv2308

Modified Files:
	gsb_real.c 
Log Message:
fixes a compilation error on windows

Index: gsb_real.c
===================================================================
RCS file: /cvsroot/grisbi/grisbi/src/gsb_real.c,v
retrieving revision 1.78
retrieving revision 1.79
diff -u -d -r1.78 -r1.79
--- gsb_real.c	17 Apr 2010 15:37:03 -0000	1.78
+++ gsb_real.c	6 May 2010 19:47:14 -0000	1.79
@@ -602,7 +602,9 @@
 
     while ( exponent < target_exponent )
     {
-        gint64 new_mantissa = mantissa * 10;
+        gint64 new_mantissa;
+
+        new_mantissa = mantissa * 10;
         if ( ( new_mantissa > G_MAXLONG ) || ( new_mantissa < G_MINLONG ) )
         {
             succes = FALSE;
@@ -630,9 +632,10 @@
  * */
 gboolean gsb_real_normalize ( gsb_real *number_1, gsb_real *number_2 )
 {
+    gboolean safe_precision = TRUE;
+
     gsb_real_minimize_exponent ( number_1 );
     gsb_real_minimize_exponent ( number_2 );
-    gboolean safe_precision = TRUE;
 
     if ( number_1->exponent < number_2->exponent )
     {