binWriteF77Block: fix last commit.

src/binary.c

@@ -98,13 +98,13 @@ void binWriteF77Block(int fileID, int byteswap, size_t blocksize)
 	}
       else
 	{
-          for (int i = 3; i >= 0; --i) f77block[i] = (unsigned char) (ublocksize >> s[i]);
+          for (int i = 0; i <= 3; ++i) f77block[3-i] = (unsigned char) (ublocksize >> s[i]);
 	}
       break;
     case CDI_LITTLEENDIAN:
       if ( byteswap )
 	{
-          for (int i = 3; i >= 0; --i) f77block[i] = (unsigned char) (ublocksize >> s[i]);
+          for (int i = 0; i <= 3; ++i) f77block[3-i] = (unsigned char) (ublocksize >> s[i]);
 	}
       else
 	{