From: Kazu Hirata <kazu@cs.umass.edu>
Date: Sun, 5 Jan 2003 23:04:48 +0000 (+0000)
Subject: * config/h8300/h8300.md (*extzv_8_23): New.
X-Git-Tag: releases/gcc-3.4.0~9589
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=dff0ea43a846f225f032d4dfde7648f08ca93ea7;p=thirdparty%2Fgcc.git

* config/h8300/h8300.md (*extzv_8_23): New.

From-SVN: r60920
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index f21a17f1dbe5..c3c015bf4935 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2003-01-05  Kazu Hirata  <kazu@cs.umass.edu>
+
+	* config/h8300/h8300.md (*extzv_8_23): New.
+
 2003-01-05  John David Anglin  <dave@hiauly1.hia.nrc.ca>
 
 	* pa64-hpux.h (JCR_SECTION_NAME): Define.
diff --git a/gcc/config/h8300/h8300.md b/gcc/config/h8300/h8300.md
index defe9d446a3a..be6bc0ffbfcd 100644
--- a/gcc/config/h8300/h8300.md
+++ b/gcc/config/h8300/h8300.md
@@ -2534,6 +2534,8 @@
 ;; COMBINE PATTERNS
 ;; -----------------------------------------------------------------
 
+;; extzv:SI
+
 (define_insn "*extzv_8_8"
   [(set (match_operand:SI 0 "register_operand" "=r")
 	(zero_extract:SI (match_operand:SI 1 "register_operand" "r")
@@ -2554,6 +2556,26 @@
   [(set_attr "cc" "set_znv")
    (set_attr "length" "6")])
 
+;; Extract the exponent of a float.
+
+(define_insn_and_split "*extzv_8_23"
+  [(set (match_operand:SI 0 "register_operand" "=r")
+	(zero_extract:SI (match_operand:SI 1 "register_operand" "0")
+			 (const_int 8)
+			 (const_int 23)))]
+  "(TARGET_H8300H || TARGET_H8300S)"
+  "#"
+  "&& reload_completed"
+  [(parallel [(set (match_dup 0)
+		   (ashift:SI (match_dup 0)
+			      (const_int 1)))
+	      (clobber (scratch:QI))])
+   (parallel [(set (match_dup 0)
+		   (lshiftrt:SI (match_dup 0)
+				(const_int 24)))
+	      (clobber (scratch:QI))])]
+  "")
+
 ;; plus:SI
 
 (define_insn "*addsi3_lshiftrt_16_zexthi"