format/internal/floats.d

629     //   consecutivly dividing by 10 and writing down the remainder from right to left.
637     //   digit (from right to left).
644     //   After that we decide on the rounding type, using the digits right of the position,
653     //   (from left to right). This integer part is removed after each step.
685     size_t right = 1;
706         start = left = right = dec_buf.length;
766         if (start >= right)
773             foreach (i; start + 1 .. right)
781         if (start < right) right = start;
842                 dec_buf[right++] = cast(byte) ('0' + over);
843                 dec_buf[right++] = '.';
850             start = right - 1;
852             start = right;
853         while ((lsu < count - 1 || mybig[$ - 1] != 0) && right - start < f.precision)
865             dec_buf[right++] = cast(byte) ('0' + over);
915             left = right = int_part.bsr * 100 / 332 + 4;
934             if (right - left > limit)
936                 auto old_right = right;
937                 right = left + limit;
939                 if (dec_buf[right] == '5' || dec_buf[right] == '0')
941                     rc = dec_buf[right] == '5' ? RoundingClass.FIVE : RoundingClass.ZERO;
945                         foreach (i;right + 1 .. old_right)
953                     rc = dec_buf[right] > '5' ? RoundingClass.UPPER : RoundingClass.LOWER;
981                     dec_buf[right++] = cast(byte) ('0' + tmp);
982                     dec_buf[right++] = '.';
1012             dec_buf[right++] = cast(byte) ('0' + (frac_part >> (T.mant_dig - 1 - exp)));
1018             limit = right - left - 1;
1038     if (round(dec_buf, left, right, rc, sgn == "-"))
1041         right--;
1063     while (right > left + 1 && dec_buf[right - 1] == '0') right--;
1065     if (right == left + 1)
1066         dec_buf[right++] = '.';
1069         writeAligned(w, sgn, dec_buf[left .. left + 1], dec_buf[left + 1 .. right],
1072         writeAligned(w, sgn, dec_buf[left .. left + 1], dec_buf[left + 1 .. right],
1542     //   consecutivly dividing by 10 and writing down the remainder from right to left.
1550     //   digit (from right to left).
1557     //   (from left to right). This integer part is removed after each step.
1594     size_t right = 2;
1600         right = dec_buf.length;
1692         dec_buf[right++] = '.';
1697             // to the right, until we found first non zero, thus avoiding
1705         while ((lsu < count - 1 || mybig[$ - 1] != 0) && right - start - 1 < f.precision)
1717             dec_buf[right++] = cast(byte) ('0' + over);
1721                 if (dec_buf[right - 1] != '0')
1776             left = right = start = int_part.bsr * 100 / 332 + 4;
1785         static if (g) size_t save_start = right;
1787         dec_buf[right++] = '.';
1791         while (frac_part != 0 && right - start - 1 < f.precision)
1807             dec_buf[right++] = cast(byte)('0' + (frac_part >> (T.mant_dig - 1 - exp)));
1811                 if (dec_buf[right - 1] != '0')
1839     if (round(dec_buf, left, right, rc, sgn == "-")) left--;
1841     while (right > start + 1 && dec_buf[right - 1] == '0') right--;
1844         writeAligned(w, sgn, dec_buf[left .. start], dec_buf[start .. right], "", f, PrecisionType.allDigits);
1846         writeAligned(w, sgn, dec_buf[left .. start], dec_buf[start .. right], "", f, PrecisionType.fractionalDigits);