Remove commented out debug printf:s

From-SVN: r185444

libgfortran/io/write_float.def

@@ -186,7 +186,6 @@ output_float (st_parameter_dt *dtp, const fnode *f, char *buffer, size_t size,
 	  nbefore--;
 	  ndigits--;
 	}
-      //printf("nbefore: %d, digits: %s\n", nbefore, digits);
       if (p != 0)
 	{
 	  if (p > 0)
@@ -200,7 +199,6 @@ output_float (st_parameter_dt *dtp, const fnode *f, char *buffer, size_t size,
 		nafter = 0;
 	      nafter = d;
 	      nzero = nzero_real = 0;
-	      //printf("digits: %s\n", digits);
 	    }
 	  else /* p < 0  */
 	    {
@@ -237,7 +235,6 @@ output_float (st_parameter_dt *dtp, const fnode *f, char *buffer, size_t size,
       if (dtp->u.p.current_unit->round_status != ROUND_UNSPECIFIED
 	  && dtp->u.p.current_unit->round_status != ROUND_PROCDEFINED)
 	memmove (digits + nbefore, digits + nbefore + 1, ndigits - nbefore);
-      //printf("nbefore after p handling: %d, digits: %s\n", nbefore, digits);
       break;
 
     case FMT_E:
@@ -344,7 +341,6 @@ output_float (st_parameter_dt *dtp, const fnode *f, char *buffer, size_t size,
 	/* Round compatible unless there is a tie. A tie is a 5 with
 	   all trailing zero's.  */
 	i = nafter + nbefore;
-	//printf("I = %d, digits = %s, nbefore = %d\n", i, digits, nbefore);
 	if (digits[i] == '5')
 	  {
 	    for(i++ ; i < ndigits; i++)
@@ -404,7 +400,6 @@ output_float (st_parameter_dt *dtp, const fnode *f, char *buffer, size_t size,
   else if (nbefore + nafter < ndigits)
     {
       i = ndigits = nbefore + nafter;
-      //printf("i: %d, digits: %s, nbefore: %d, nafter: %d\n", i, digits, nbefore, nafter);
       if (digits[i] >= rchar)
 	{
 	  /* Propagate the carry.  */