Lines Matching refs:cut
616 Int cut; /* work */
637 target=uar+D2U(digits)-1+D2U(shift);/* where upper part of first cut goes */
638 cut=DECDPUN-MSUDIGITS(shift); /* where to slice */
639 if (cut==0) { /* unit-boundary case */
647 uInt quot=QUOT10(*source, cut);
648 uInt rem=*source-quot*DECPOWERS[cut];
651 uInt rem=*source%DECPOWERS[cut];
652 next+=*source/DECPOWERS[cut];
655 next=rem*DECPOWERS[DECDPUN-cut]; /* save remainder for next Unit */
671 cut=0; /* at lowest digit */
698 cut++;
699 if (cut==DECDPUN) {inu++; in=*inu; cut=0;}
753 Int cut=0; /* power of ten in current unit */
782 cut++;
783 if (cut==DECDPUN) {*uout=out; if (out) {last=uout; out=0;} uout++; cut=0;}
785 cut++;
786 if (cut==DECDPUN) {*uout=out; if (out) {last=uout; out=0;} uout++; cut=0;}
787 cut++;
788 if (cut==DECDPUN) {*uout=out; if (out) {last=uout; out=0;} uout++; cut=0;}
796 if (nibble) out=(Unit)(out+nibble*DECPOWERS[cut]);
797 cut++;
798 if (cut==DECDPUN) {*uout=out; if (out) {last=uout; out=0;} uout++; cut=0;}
808 if (nibble) out=(Unit)(out+nibble*DECPOWERS[cut]);
809 cut++;
810 if (cut==DECDPUN) {*uout=out; if (out) {last=uout; out=0;} uout++; cut=0;}
814 if (nibble) out=(Unit)(out+nibble*DECPOWERS[cut]);
815 cut++;
816 if (cut==DECDPUN) {*uout=out; if (out) {last=uout; out=0;} uout++; cut=0;}
818 if (cut!=0) { /* some more left over */
Indexes created Sun Apr 12 00:22:20 UTC 2026