re PR rtl-optimization/3700 (ISSUE_RATE not defined for mips target)

2002-04-26  Eric Christopher  <echristo@redhat.com>

	PR optimization/3700
	* config/mips/mips.c (mips_issue_rate): Define.  New function.
	(TARGET_SCHED_ISSUE_RATE): Use.

From-SVN: r52825

gcc/ChangeLog

+2002-04-26  Eric Christopher  <echristo@redhat.com>
+
+	PR optimization/3700
+	* config/mips/mips.c (mips_issue_rate): Define.  New function.
+	(TARGET_SCHED_ISSUE_RATE): Use.
+
 2002-04-25  David S. Miller  <davem@redhat.com>
 
 	PR target/6422

gcc/config/mips/mips.c

@@ -143,6 +143,7 @@ static hashval_t iris_section_align_entry_hash	PARAMS ((const PTR));
 static int iris6_section_align_1		PARAMS ((void **, void *));
 #endif
 static int mips_adjust_cost			PARAMS ((rtx, rtx, rtx, int));
+static int mips_issue_rate			PARAMS ((void));
 
 static void mips_init_machine_status		PARAMS ((struct function *));
 static void mips_free_machine_status		PARAMS ((struct function *));
@@ -572,6 +573,9 @@ enum reg_class mips_char_to_class[256] =
 #undef TARGET_SCHED_ADJUST_COST
 #define TARGET_SCHED_ADJUST_COST mips_adjust_cost
 
+#undef TARGET_SCHED_ISSUE_RATE
+#define TARGET_SCHED_ISSUE_RATE mips_issue_rate
+
 struct gcc_target targetm = TARGET_INITIALIZER;
 
 /* Return truth value of whether OP can be used as an operands
@@ -10324,7 +10328,24 @@ mips_return_in_memory (type)
 	    || (int_size_in_bytes (type) == -1));
 }
 
+static int
+mips_issue_rate ()
+{
+  int rate;
+
+  switch (mips_tune)
+    {
+    case PROCESSOR_R3000:
+      rate = 1;
+      break;
 
+    default:
+      rate = 1;
+      break;
+    }
+
+  return rate;
+}
 
 
 #ifdef TARGET_IRIX6