--- a/liboctave/Array-d.cc	Fri Jul 11 15:43:10 2008 -0400
+++ b/liboctave/Array-d.cc	Fri Jul 11 17:59:28 2008 -0400
@@ -139,7 +139,8 @@
 		{
 		  octave_idx_type i = 0;
 		  double *vtmp = reinterpret_cast<double *> (p);
-		  while (xisnan (vtmp[i++]) && i < ns);
+		  while (xisnan (vtmp[i++]) && i < ns)
+		    /* do nothing */;
 		  for (octave_idx_type l = 0; l < ns - i + 1; l++)
 		    vtmp[l] = vtmp[l+i-1];
 		  for (octave_idx_type l = ns - i + 1; l < ns; l++)
@@ -149,7 +150,8 @@
 		{
 		  octave_idx_type i = ns;
 		  double *vtmp = reinterpret_cast<double *> (p);
-		  while (xisnan (vtmp[--i]) && i > 0);
+		  while (xisnan (vtmp[--i]) && i > 0)
+		    /* do nothing */;
 		  for (octave_idx_type l = i; l >= 0; l--)
 		    vtmp[l-i+ns-1] = vtmp[l];
 		  for (octave_idx_type l = 0; l < ns - i - 1; l++)
@@ -199,7 +201,8 @@
 	      if (mode == ASCENDING)
 		{
 		   octave_idx_type i = 0;
-		  while (xisnan (v[i++*stride + offset]) && i < ns);
+		  while (xisnan (v[i++*stride + offset]) && i < ns)
+		    /* do nothing */;
 		  for (octave_idx_type l = 0; l < ns - i + 1; l++)
 		    v[l*stride + offset] = v[(l+i-1)*stride + offset];
 		  for (octave_idx_type l = ns - i + 1; l < ns; l++)
@@ -208,7 +211,8 @@
 	      else
 		{
 		   octave_idx_type i = ns;
-		  while (xisnan (v[--i*stride + offset]) && i > 0);
+		  while (xisnan (v[--i*stride + offset]) && i > 0)
+		    /* do nothing */;
 		  for (octave_idx_type l = i; l >= 0; l--)
 		    v[(l-i+ns-1)*stride + offset] = v[l*stride + offset];
 		  for (octave_idx_type l = 0; l < ns - i - 1; l++)
@@ -303,7 +307,8 @@
 	  if (mode == ASCENDING)
 	    {
 	      octave_idx_type i = 0;
-	      while (xisnan (v[i++*stride+offset]) && i < ns);
+	      while (xisnan (v[i++*stride+offset]) && i < ns)
+		/* do nothing */;
 	      OCTAVE_LOCAL_BUFFER (double, itmp, i - 1);
 	      for (octave_idx_type l = 0; l < i -1; l++)
 		itmp[l] = sidx(l*stride + offset);
@@ -322,7 +327,8 @@
 	  else 
 	    {
 	      octave_idx_type i = ns;
-	      while (xisnan (v[--i*stride+offset]) && i > 0);
+	      while (xisnan (v[--i*stride+offset]) && i > 0)
+		/* do nothing */;
 	      OCTAVE_LOCAL_BUFFER (double, itmp, ns - i - 1);
 	      for (octave_idx_type l = 0; l < ns - i -1; l++)
 		itmp[l] = sidx((l+i+1)*stride + offset);