h8300.md (*tstsi_variable_bit): New.
authorKazu Hirata <kazu@cs.umass.edu>
Mon, 29 Sep 2003 16:32:28 +0000 (16:32 +0000)
committerKazu Hirata <kazu@gcc.gnu.org>
Mon, 29 Sep 2003 16:32:28 +0000 (16:32 +0000)
* config/h8300/h8300.md (*tstsi_variable_bit): New.
(*tstsi_variable_bit_qi): Likewise.

From-SVN: r71902

gcc/ChangeLog
gcc/config/h8300/h8300.md

index c4d1807ca2673dbe8453d71e4a883c931e558bcc..76e38ad310e190d1c34394a0eae11f84d2ad4bb9 100644 (file)
@@ -1,3 +1,8 @@
+2003-09-29  Kazu Hirata  <kazu@cs.umass.edu>
+
+       * config/h8300/h8300.md (*tstsi_variable_bit): New.
+       (*tstsi_variable_bit_qi): Likewise.
+
 2003-09-28  Phil Edwards  <phil@codesourcery.com>
 
        * doc/cppopts.texi:  Use 'dashMP' instead of '-MP' as a cross-
index b17a03ead80f9762d6f9039d04be54f544f829cf..33828bc1e5e7cd9ca3dfdcc2e92edddd86dc044c 100644 (file)
                         (match_dup 3)))]
   "operands[3] = GEN_INT (INTVAL (operands[1]) - 16);")
 
+(define_insn "*tstsi_variable_bit"
+  [(set (cc0)
+       (zero_extract:SI (match_operand:SI 0 "register_operand" "r")
+                        (const_int 1)
+                        (and:SI (match_operand:SI 1 "register_operand" "r")
+                                (const_int 7))))]
+  "TARGET_H8300H || TARGET_H8300S"
+  "btst        %w1,%w0"
+  [(set_attr "length" "2")
+   (set_attr "cc" "set_zn")])
+
+(define_insn_and_split "*tstsi_variable_bit_qi"
+  [(set (cc0)
+       (zero_extract:SI (zero_extend:SI (match_operand:QI 0 "general_operand_src" "r,U,mn>"))
+                        (const_int 1)
+                        (and:SI (match_operand:SI 1 "register_operand" "r,r,r")
+                                (const_int 7))))
+   (clobber (match_scratch:QI 2 "=X,X,&r"))]
+  "(TARGET_H8300H || TARGET_H8300S)"
+  "@
+   btst\\t%w1,%X0
+   btst\\t%w1,%X0
+   #"
+  "&& reload_completed
+   && !EXTRA_CONSTRAINT (operands[0], 'U')"
+  [(set (match_dup 2)
+       (match_dup 0))
+   (parallel [(set (cc0) (zero_extract:SI (zero_extend:SI (match_dup 2))
+                                         (const_int 1)
+                                         (and:SI (match_dup 1)
+                                                 (const_int 7))))
+             (clobber (scratch:QI))])]
+  ""
+  [(set_attr "length" "2,8,10")
+   (set_attr "cc" "set_zn,set_zn,set_zn")])
+
 (define_insn "tstqi"
   [(set (cc0) (match_operand:QI 0 "register_operand" "r"))]
   ""