625   const Unit *inu=dn->lsu;    /* -> current input unit */  in decDigitsToDPD()
626   Unit	uar[DECMAXUNITS];     /* working copy of units, iff shifted */  in decDigitsToDPD()
628     Unit in;		      /* current unit */  in decDigitsToDPD()
635     const Unit *source;			/* .. */  in decDigitsToDPD()
636     Unit  *target, *first;		/* .. */  in decDigitsToDPD()
657 	if (target<=first) *target=(Unit)next; /* write to target iff valid */  in decDigitsToDPD()
663       *target=(Unit)next;  in decDigitsToDPD()
685       Unit dig;			   /* current digit */  in decDigitsToDPD()
689 	  Unit temp=(Unit)((uInt)(in*6554)>>16);  in decDigitsToDPD()
690 	  dig=(Unit)(in-X10(temp));  in decDigitsToDPD()
747   Unit	*uout=dn->lsu;		   /* -> current output unit */  in decDigitsFromDPD()
748   Unit	*last=uout;		   /* will be unit containing msd */  in decDigitsFromDPD()
755   Unit	out=0;			   /* accumulator */  in decDigitsFromDPD()
799     if (nibble) out=(Unit)(out+nibble*DECPOWERS[cut]);  in decDigitsFromDPD()
811     if (nibble) out=(Unit)(out+nibble*DECPOWERS[cut]);  in decDigitsFromDPD()
817     if (nibble) out=(Unit)(out+nibble*DECPOWERS[cut]);  in decDigitsFromDPD()