Lines Matching defs:form
94 #define NZDIGIT(c) (('1' <= c && c <= '9') || ((int)form < 0 && \
111 enum decimal_string_form form;
130 *pform = form = invalid_form;
146 form = whitespace_form;
173 form = fixed_int_form;
201 /* assume hex fp form */
202 form = (enum decimal_string_form)-1;
221 form = fixed_int_form;
226 form = fixed_int_form;
229 form = fixed_int_form;
265 form = inf_form;
268 form = infinity_form;
298 form = nan_form;
330 form = nanstring_form;
361 * an exponent delimiter (E or e for any decimal form; +, -, D, d,
362 * Q, or q when fortran_conventions >= 2; P or p for hex form),
458 if ((int)form < 0)
464 if ((int)form > 0)
472 if (form == fixed_int_form)
473 form = fixed_intdot_form;
488 /* found a digit after the point; revise form */
489 if (form == invalid_form || form == whitespace_form)
490 form = fixed_dotfrac_form;
491 else if (form == fixed_intdot_form)
492 form = fixed_intdotfrac_form;
567 /* found a digit after the point; revise form */
568 if (form == invalid_form || form == whitespace_form)
569 form = fixed_dotfrac_form;
570 else if (form == fixed_intdot_form)
571 form = fixed_intdotfrac_form;
613 if (sigfound == -1 || (int)form < 0)
620 if (sigfound == -1 || (int)form > 0)
694 * If we successfully parsed an exponent field, update form
698 switch (form) {
701 form = floating_int_form;
705 form = floating_intdot_form;
709 form = floating_dotfrac_form;
713 form = floating_intdotfrac_form;
745 form = invalid_form;
748 *pform = form;