* alpha.md (trunctfsf2): New.

From-SVN: r31662
This commit is contained in:
Richard Henderson 2000-01-27 20:36:43 -08:00 committed by Richard Henderson
parent 0843179b2e
commit 138eff91a2
2 changed files with 20 additions and 0 deletions

View File

@ -1,3 +1,7 @@
2000-01-27 Richard Henderson <rth@cygnus.com>
* alpha.md (trunctfsf2): New.
2000-01-27 Andrew Hobson <ahobson@eng.mindspring.net>
* configure.in (alpha-dec-osf5): Enable MASK_SUPPORT_ARCH.

View File

@ -2207,6 +2207,22 @@
"TARGET_HAS_XFLOATING_LIBS"
"alpha_emit_xfloating_cvt (FLOAT_TRUNCATE, operands); DONE;")
;; ??? This isn't quite right, as rounding isn't correct. But it's
;; extremely tortureous to do this correctly with the functionality
;; availible in the library.
(define_expand "trunctfsf2"
[(use (match_operand:SF 0 "register_operand" ""))
(use (match_operand:TF 1 "general_operand" ""))]
"TARGET_HAS_XFLOATING_LIBS"
"
{
rtx tmp = gen_reg_rtx (DFmode);
emit_insn (gen_trunctfdf2 (tmp, operands[1]));
emit_insn (gen_truncdfsf2 (operands[0], tmp));
DONE;
}")
(define_insn ""
[(set (match_operand:SF 0 "register_operand" "=&f")
(div:SF (match_operand:SF 1 "reg_or_fp0_operand" "fG")