This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.
Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]
Other format:	[Raw text]
[committed] mips.md macroisation (24/24)

From: Richard Sandiford <rsandifo at redhat dot com>
To: gcc-patches at gcc dot gnu dot org
Date: Tue, 31 Aug 2004 07:56:59 +0100
Subject: [committed] mips.md macroisation (24/24)
The last mips.md macroisation patch that I had planned.  It handles
the c.cond.fmt patterns that are generated by mips_emit_compare().
There should be no behavioural changes.

Bootstrapped & regression tested on mips-sgi-irix6.5.  Applied to head.

Richard


	* config/mips/mips.md (fcond): New code macro and attribute.
	(sunordered_[sd]f, suneq_[sd]f, sunlt_[sd]f, sunle_[sd]f)
	(seq_[sd]f, slt_[sd]f, sle_[sd]f): Redefine using :SCALARF and fcond.
	(sgt_[sd]f, sge_[sd]f): Redefine using :SCALARF.

Index: config/mips/mips.md
===================================================================
RCS file: /cvs/gcc/gcc/gcc/config/mips/mips.md,v
retrieving revision 1.296
diff -c -p -F^\([(a-zA-Z0-9_]\|#define\) -r1.296 mips.md
*** config/mips/mips.md	29 Aug 2004 12:06:00 -0000	1.296
--- config/mips/mips.md	30 Aug 2004 06:49:39 -0000
*************** (define_code_macro any_extend [sign_exte
*** 422,427 ****
--- 422,431 ----
  ;; from the same template.
  (define_code_macro any_shift [ashift ashiftrt lshiftrt])
  
+ ;; This code macro allows all native floating-point comparisons to be
+ ;; generated from the same template.
+ (define_code_macro fcond [unordered uneq unlt unle eq lt le])
+ 
  ;; <u> expands to an empty string when doing a signed operation and
  ;; "u" when doing an unsigned operation.
  (define_code_attr u [(sign_extend "") (zero_extend "u")])
*************** (define_code_attr optab [(ashift "ashl")
*** 438,443 ****
--- 442,456 ----
  (define_code_attr insn [(ashift "sll")
  			(ashiftrt "sra")
  			(lshiftrt "srl")])
+ 
+ ;; <fcond> is the c.cond.fmt condition associated with a particular code.
+ (define_code_attr fcond [(unordered "un")
+ 			 (uneq "ueq")
+ 			 (unlt "ult")
+ 			 (unle "ule")
+ 			 (eq "eq")
+ 			 (lt "lt")
+ 			 (le "le")])
  
  ;; .........................
  ;;
*************** (define_insn "*sleu_<mode>_mips16"
*** 4772,4936 ****
  ;;
  ;;  ....................
  
! (define_insn "sunordered_df"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(unordered:CC (match_operand:DF 1 "register_operand" "f")
! 		      (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.un.d\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sunlt_df"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(unlt:CC (match_operand:DF 1 "register_operand" "f")
! 		 (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.ult.d\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "suneq_df"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(uneq:CC (match_operand:DF 1 "register_operand" "f")
! 		 (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.ueq.d\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sunle_df"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(unle:CC (match_operand:DF 1 "register_operand" "f")
! 		 (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.ule.d\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "seq_df"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(eq:CC (match_operand:DF 1 "register_operand" "f")
! 	       (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.eq.d\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "slt_df"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(lt:CC (match_operand:DF 1 "register_operand" "f")
! 	       (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.lt.d\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sle_df"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(le:CC (match_operand:DF 1 "register_operand" "f")
! 	       (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.le.d\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sgt_df"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(gt:CC (match_operand:DF 1 "register_operand" "f")
! 	       (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.lt.d\t%Z0%2,%1"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sge_df"
    [(set (match_operand:CC 0 "register_operand" "=z")
! 	(ge:CC (match_operand:DF 1 "register_operand" "f")
! 	       (match_operand:DF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT && TARGET_DOUBLE_FLOAT"
!   "c.le.d\t%Z0%2,%1"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sunordered_sf"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(unordered:CC (match_operand:SF 1 "register_operand" "f")
! 		      (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.un.s\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sunlt_sf"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(unlt:CC (match_operand:SF 1 "register_operand" "f")
! 		 (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.ult.s\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "suneq_sf"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(uneq:CC (match_operand:SF 1 "register_operand" "f")
! 		 (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.ueq.s\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sunle_sf"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(unle:CC (match_operand:SF 1 "register_operand" "f")
! 		 (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.ule.s\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "seq_sf"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(eq:CC (match_operand:SF 1 "register_operand" "f")
! 	       (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.eq.s\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "slt_sf"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(lt:CC (match_operand:SF 1 "register_operand" "f")
! 	       (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.lt.s\t%Z0%1,%2"
!   [(set_attr "type" "fcmp")
!    (set_attr "mode" "FPSW")])
! 
! (define_insn "sle_sf"
!   [(set (match_operand:CC 0 "register_operand" "=z")
! 	(le:CC (match_operand:SF 1 "register_operand" "f")
! 	       (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.le.s\t%Z0%1,%2"
    [(set_attr "type" "fcmp")
     (set_attr "mode" "FPSW")])
  
! (define_insn "sgt_sf"
    [(set (match_operand:CC 0 "register_operand" "=z")
! 	(gt:CC (match_operand:SF 1 "register_operand" "f")
! 	       (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.lt.s\t%Z0%2,%1"
    [(set_attr "type" "fcmp")
     (set_attr "mode" "FPSW")])
  
! (define_insn "sge_sf"
    [(set (match_operand:CC 0 "register_operand" "=z")
! 	(ge:CC (match_operand:SF 1 "register_operand" "f")
! 	       (match_operand:SF 2 "register_operand" "f")))]
!   "TARGET_HARD_FLOAT"
!   "c.le.s\t%Z0%2,%1"
    [(set_attr "type" "fcmp")
     (set_attr "mode" "FPSW")])
  
--- 4785,4814 ----
  ;;
  ;;  ....................
  
! (define_insn "s<code>_<mode>"
    [(set (match_operand:CC 0 "register_operand" "=z")
! 	(fcond:CC (match_operand:SCALARF 1 "register_operand" "f")
! 		  (match_operand:SCALARF 2 "register_operand" "f")))]
!   ""
!   "c.<fcond>.<fmt>\t%Z0%1,%2"
    [(set_attr "type" "fcmp")
     (set_attr "mode" "FPSW")])
  
! (define_insn "sgt_<mode>"
    [(set (match_operand:CC 0 "register_operand" "=z")
! 	(gt:CC (match_operand:SCALARF 1 "register_operand" "f")
! 	       (match_operand:SCALARF 2 "register_operand" "f")))]
!   ""
!   "c.lt.<fmt>\t%Z0%2,%1"
    [(set_attr "type" "fcmp")
     (set_attr "mode" "FPSW")])
  
! (define_insn "sge_<mode>"
    [(set (match_operand:CC 0 "register_operand" "=z")
! 	(ge:CC (match_operand:SCALARF 1 "register_operand" "f")
! 	       (match_operand:SCALARF 2 "register_operand" "f")))]
!   ""
!   "c.le.<fmt>\t%Z0%2,%1"
    [(set_attr "type" "fcmp")
     (set_attr "mode" "FPSW")])
Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]