contrib/gcc/expr.c

353   enum machine_mode to_mode = GET_MODE (to);
355   int to_real = SCALAR_FLOAT_MODE_P (to_mode);
378 	  >= GET_MODE_SIZE (to_mode))
380     from = gen_lowpart (to_mode, from), from_mode = to_mode;
384   if (to_mode == from_mode
391   if (VECTOR_MODE_P (to_mode) || VECTOR_MODE_P (from_mode))
393       gcc_assert (GET_MODE_BITSIZE (from_mode) == GET_MODE_BITSIZE (to_mode));
395       if (VECTOR_MODE_P (to_mode))
396 	from = simplify_gen_subreg (to_mode, from, GET_MODE (from), 0);
417 		   != GET_MODE_PRECISION (to_mode))
419 		      != DECIMAL_FLOAT_MODE_P (to_mode)));
421       if (GET_MODE_PRECISION (from_mode) == GET_MODE_PRECISION (to_mode))
424       else if (GET_MODE_PRECISION (from_mode) < GET_MODE_PRECISION (to_mode))
431       code = tab->handlers[to_mode][from_mode].insn_code;
440       libcall = tab->handlers[to_mode][from_mode].libfunc;
446       value = emit_library_call_value (libcall, NULL_RTX, LCT_CONST, to_mode,
451 			  tab == trunc_optab ? gen_rtx_FLOAT_TRUNCATE (to_mode,
453 			  : gen_rtx_FLOAT_EXTEND (to_mode, from));
460   if (GET_MODE_CLASS (to_mode) == MODE_PARTIAL_INT)
463 	= smallest_mode_for_size (GET_MODE_BITSIZE (to_mode), MODE_INT);
465       gcc_assert (trunc_optab->handlers[to_mode][full_mode].insn_code
470       emit_unop_insn (trunc_optab->handlers[to_mode][full_mode].insn_code,
483       if (to_mode == full_mode)
502   if (GET_MODE_BITSIZE (from_mode) < GET_MODE_BITSIZE (to_mode)
503       && GET_MODE_BITSIZE (to_mode) > BITS_PER_WORD)
511       int nwords = CEIL (GET_MODE_SIZE (to_mode), UNITS_PER_WORD);
514       if ((code = can_extend_p (to_mode, from_mode, unsignedp))
528 	       && ((code = can_extend_p (to_mode, word_mode, unsignedp))
593 	  rtx subword = operand_subword (to, index, 1, to_mode);
605 			      gen_rtx_fmt_e (equiv_code, to_mode, copy_rtx (from)));
611       && GET_MODE_BITSIZE (to_mode) <= BITS_PER_WORD)
615 	     && direct_load[(int) to_mode]
628   if (GET_MODE_BITSIZE (to_mode) < GET_MODE_BITSIZE (from_mode)
629       && TRULY_NOOP_TRUNCATION (GET_MODE_BITSIZE (to_mode),
634 	     && direct_load[(int) to_mode]
640 	  && ! HARD_REGNO_MODE_OK (REGNO (from), to_mode))
642       emit_move_insn (to, gen_lowpart (to_mode, from));
647   if (GET_MODE_BITSIZE (to_mode) > GET_MODE_BITSIZE (from_mode))
650       if ((code = can_extend_p (to_mode, from_mode, unsignedp))
665 	    if (((can_extend_p (to_mode, intermediate, unsignedp)
667 		 || (GET_MODE_SIZE (to_mode) < GET_MODE_SIZE (intermediate)
668 		     && TRULY_NOOP_TRUNCATION (GET_MODE_BITSIZE (to_mode),
681 					GET_MODE_BITSIZE (to_mode)
683 	  from = gen_lowpart (to_mode, force_reg (from_mode, from));
684 	  tmp = expand_shift (LSHIFT_EXPR, to_mode, from, shift_amount,
686 	  tmp = expand_shift (RSHIFT_EXPR, to_mode, tmp, shift_amount,
695   if (trunc_optab->handlers[to_mode][from_mode].insn_code != CODE_FOR_nothing)
697       emit_unop_insn (trunc_optab->handlers[to_mode][from_mode].insn_code,
709   if (GET_MODE_BITSIZE (to_mode) < GET_MODE_BITSIZE (from_mode))
711       rtx temp = force_reg (to_mode, gen_lowpart (to_mode, from));