Lines Matching defs:dr
38 decimal_record dr;
55 double_to_decimal(&arg, &dm, &dr, &ef);
56 *sign = dr.sign;
57 switch (dr.fpclass) {
60 *decpt = dr.exponent + dr.ndigits;
61 for (i = 0; i < dr.ndigits; i++)
62 buf[i] = dr.ds[i];
67 if (ndigits > 0 && dr.exponent > -ndigits) {
68 while (i < dr.ndigits + dr.exponent + ndigits)
82 __infnanstring(dr.fpclass, ndigits, buf);
92 decimal_record dr;
109 single_to_decimal(arg, &dm, &dr, &ef);
110 *sign = dr.sign;
111 switch (dr.fpclass) {
114 *decpt = dr.exponent + dr.ndigits;
115 for (i = 0; i < dr.ndigits; i++)
116 buf[i] = dr.ds[i];
121 if (ndigits > 0 && dr.exponent > -ndigits) {
122 while (i < dr.ndigits + dr.exponent + ndigits)
136 __infnanstring(dr.fpclass, ndigits, buf);
146 decimal_record dr;
164 quadruple_to_decimal(arg, &dm, &dr, &ef);
166 extended_to_decimal((extended *)arg, &dm, &dr, &ef);
170 *sign = dr.sign;
173 * *_to_decimal raises overflow whenever dr.ds isn't large
179 * would overflow dr.ds, so we punt instead. (We could
188 switch (dr.fpclass) {
191 *decpt = dr.exponent + dr.ndigits;
192 for (i = 0; i < dr.ndigits; i++)
193 buf[i] = dr.ds[i];
205 __infnanstring(dr.fpclass, ndigits, buf);