Lines Matching refs:words
147 make_invalid_floating_point_number (LITTLENUM_TYPE *words)
151 words[0] = (LITTLENUM_TYPE) -1 >> 1;
152 words[1] = -1;
153 words[2] = -1;
154 words[3] = -1;
155 words[4] = -1;
156 words[5] = -1;
173 LITTLENUM_TYPE * words,
181 /* Number of 16-bit words in the format. */
208 make_invalid_floating_point_number (words);
215 gen_to_words (words, precision, exponent_bits);
236 LITTLENUM_TYPE *words) /* Build the binary here. */
286 make_invalid_floating_point_number (words);
290 return atof_ieee_detail (str, precision, exponent_bits, words, NULL);
296 gen_to_words (LITTLENUM_TYPE *words, int precision, long exponent_bits)
309 words_end = words + precision;
321 words[0] = 0x0000;
323 words[0] = 0x8000;
324 memset (&words[1], '\0',
325 (words_end - words - 1) * sizeof (LITTLENUM_TYPE));
341 words[0] = 0x7fff;
343 words[0] = exponent_bits == 5 ? 0x7dff : 0x7fbf;
347 words[0] = TOUPPER (generic_floating_point_number.sign) == 'S'
349 words[1] = 0xffff;
357 words[0] = 0x7fff;
358 words[1] = 0;
359 words[2] = 0xffff;
360 words[3] = 0xffff;
361 words[4] = 0xffff;
362 words[5] = 0xffff;
365 words[0] = 0x7fff;
366 words[1] = TOUPPER (generic_floating_point_number.sign) == 'S'
368 words[2] = 0xffff;
369 words[3] = 0xffff;
370 words[4] = 0xffff;
378 words[0] = TOUPPER (generic_floating_point_number.sign) == 'S'
380 words[1] = 0xffff;
381 words[2] = 0xffff;
382 words[3] = 0xffff;
386 words[0] |= 0x8000;
398 words[0] = exponent_bits == 5 ? 0x7c00 : 0x7f80;
402 words[0] = 0x7f80;
403 words[1] = 0;
408 words[0] = 0x7fff;
409 words[1] = 0;
410 words[2] = 0;
411 words[3] = 0;
412 words[4] = 0;
413 words[5] = 0;
416 words[0] = 0x7fff;
417 words[1] = 0x8000;
418 words[2] = 0;
419 words[3] = 0;
420 words[4] = 0;
428 words[0] = 0x7ff0;
429 words[1] = 0;
430 words[2] = 0;
431 words[3] = 0;
435 words[0] |= 0x8000;
472 lp = words;
509 make_invalid_floating_point_number (words);
578 for (carry = 1; carry && (lp >= words); lp--)
590 lp = words;
624 make_invalid_floating_point_number (words);
646 /* The rest of the words are just mantissa bits. */
672 if (lp == words)
679 if (lp == words)
684 words[0] += words[1];
685 words[1] = 0;
692 if ((word1 ^ *words) & (1 << (LITTLENUM_NUMBER_OF_BITS - 1)))
697 *words &= ~(1 << (LITTLENUM_NUMBER_OF_BITS - 1));
750 LITTLENUM_TYPE words[MAX_LITTLENUMS];
831 t = atof_ieee (input_line_pointer, type, words);
839 for (wordP = words; prec--;)
847 for (wordP = words + prec; prec--;)