--- a/libdecnumber/decPacked.c	Sun Feb 07 18:28:00 2010 +0900
+++ b/libdecnumber/decPacked.c	Fri Feb 12 23:39:51 2010 +0900
@@ -26,12 +26,12 @@
 /* ------------------------------------------------------------------ */
 /* Packed Decimal conversion module				      */
 /* ------------------------------------------------------------------ */
-/* This module comprises the routines for Packed Decimal format	      */
+/* This module comprises the routines for Packed Decimal format       */
 /* numbers.  Conversions are supplied to and from decNumber, which in */
 /* turn supports:						      */
 /*   conversions to and from string				      */
 /*   arithmetic routines					      */
-/*   utilities.							      */
+/*   utilities. 						      */
 /* Conversions from decNumber to and from densely packed decimal      */
 /* formats are provided by the decimal32 through decimal128 modules.  */
 /* ------------------------------------------------------------------ */
@@ -46,8 +46,8 @@
 /*								      */
 /*   bcd    is the BCD bytes					      */
 /*   length is the length of the BCD array			      */
-/*   scale  is the scale result					      */
-/*   dn	    is the decNumber					      */
+/*   scale  is the scale result 				      */
+/*   dn     is the decNumber					      */
 /*   returns bcd, or NULL if error				      */
 /*								      */
 /* The number is converted to a BCD packed decimal byte array,	      */
@@ -62,7 +62,7 @@
 /* as necessary.						      */
 /*								      */
 /* If there is an error (that is, the decNumber has too many digits   */
-/* to fit in length bytes, or it is a NaN or Infinity), NULL is	      */
+/* to fit in length bytes, or it is a NaN or Infinity), NULL is       */
 /* returned and the bcd and scale results are unchanged.  Otherwise   */
 /* bcd is returned.						      */
 /* ------------------------------------------------------------------ */
@@ -81,9 +81,9 @@
   if (dn->digits>length*2-1		     /* too long .. */
    ||(dn->bits & DECSPECIAL)) return NULL;   /* .. or special -- hopeless */
 
-  if (dn->bits&DECNEG) obyte=DECPMINUS;	     /* set the sign .. */
-   else		       obyte=DECPPLUS;
-  *scale=-dn->exponent;			     /* .. and scale */
+  if (dn->bits&DECNEG) obyte=DECPMINUS;      /* set the sign .. */
+   else 	       obyte=DECPPLUS;
+  *scale=-dn->exponent; 		     /* .. and scale */
 
   /* loop from lowest (rightmost) byte */
   out=bcd+length-1;			     /* -> final byte */
@@ -136,7 +136,7 @@
 /*   bcd    is the BCD bytes					      */
 /*   length is the length of the BCD array			      */
 /*   scale  is the scale associated with the BCD integer	      */
-/*   dn	    is the decNumber [with space for length*2 digits]	      */
+/*   dn     is the decNumber [with space for length*2 digits]	      */
 /*   returns dn, or NULL if error				      */
 /*								      */
 /* The BCD packed decimal byte array, together with an associated     */
@@ -152,7 +152,7 @@
 /* no error is possible unless the adjusted exponent is out of range, */
 /* no sign nibble was found, or a sign nibble was found before the    */
 /* final nibble.  In these error cases, NULL is returned and the      */
-/* decNumber will be 0.						      */
+/* decNumber will be 0. 					      */
 /* ------------------------------------------------------------------ */
 decNumber * decPackedToNumber(const uByte *bcd, Int length,
 			      const Int *scale, decNumber *dn) {
@@ -160,7 +160,7 @@
   const uByte *first;		   /* -> first non-zero byte */
   uInt	nib;			   /* work nibble */
   Unit	*up=dn->lsu;		   /* output pointer */
-  Int	digits;			   /* digits count */
+  Int	digits; 		   /* digits count */
   Int	cut=0;			   /* phase of output */
 
   decNumberZero(dn);		   /* default result */
@@ -177,7 +177,7 @@
 					/* leave as 1] */
 
   /* check the adjusted exponent; note that scale could be unbounded */
-  dn->exponent=-*scale;			/* set the exponent */
+  dn->exponent=-*scale; 		/* set the exponent */
   if (*scale>=0) {			/* usual case */
     if ((dn->digits-*scale-1)<-DECNUMMAXE) {	  /* underflow */
       decNumberZero(dn);