contrib/gcc/c-cppbuiltin.c

93   const struct real_format *fmt;
99   fmt = REAL_MODE_FORMAT (TYPE_MODE (type));
100   gcc_assert (fmt->b != 10);
104     builtin_define_with_int_value ("__FLT_RADIX__", fmt->b);
105   log10_b = log10_2 * fmt->log2_b;
109   builtin_define_with_int_value (name, fmt->p);
118   dig = (fmt->p - 1) * log10_b;
124   sprintf (buf, "(%d)", fmt->emin);
134   min_10_exp = (fmt->emin - 1) * log10_b;
141   builtin_define_with_int_value (name, fmt->emax);
169   max_10_exp = fmt->emax * log10_b;
183     double d_decimal_dig = 1 + fmt->p * log10_b;
202     n = fmt->p * fmt->log2_b;
207     sprintf (p, "p%d", fmt->emax * fmt->log2_b);
208     if (fmt->pnan < fmt->p)
216 	buf[4 + fmt->pnan / 4] = "7bde"[fmt->pnan % 4];
225   sprintf (buf, "0x1p%d", (fmt->emin - 1) * fmt->log2_b);
231   if (fmt->pnan < fmt->p)
234       sprintf (buf, "0x1p%d", (fmt->emin - fmt->p) * fmt->log2_b);
236       sprintf (buf, "0x1p%d", (1 - fmt->p) * fmt->log2_b);
243   if (fmt->has_denorm)
245       sprintf (buf, "0x1p%d", (fmt->emin - fmt->p) * fmt->log2_b);
256   builtin_define_with_value (name, fmt->has_denorm ? "1" : "0", 0);
277   const struct real_format *fmt;
281   fmt = REAL_MODE_FORMAT (TYPE_MODE (type));
285   builtin_define_with_int_value (name, fmt->p);
289   sprintf (buf, "(%d)", fmt->emin);
294   builtin_define_with_int_value (name, fmt->emax);
298   sprintf (buf, "1E%d%s", fmt->emin, suffix);
304   for (digits = fmt->p; digits; digits--)
307       if (digits == fmt->p)
311   /* fmt->p plus 1, to account for the decimal point.  */
312   sprintf (&buf[fmt->p + 1], "E%d%s", fmt->emax, suffix);
318   sprintf (buf, "1E-%d%s", fmt->p - 1, suffix);
324   for (digits = fmt->p; digits > 1; digits--)
327       if (digits == fmt->p)
331   sprintf (&buf[fmt->p], "1E%d%s", fmt->emin, suffix);