Warning fixes:

        * ch-tree.h (build_delay_case_end): Remove unused parameter.
        (build_receive_case_end): Likewise.
        (check_queue_size): Likewise.
        * parse.c: Callers changed.
        * satisfy.c: Likewise.
        * tasking.c (build_receive_buffer_case_end): Remove unused
        parameter `label_cnt'.
        (build_receive_signal_case_end): Likewise.
        (build_receive_case_end): Likewise.
        (build_delay_case_end): Likewise.
        (check_queue_size): Likewise for parameter `type'.
        All callers changed.

From-SVN: r22957

gcc/ch/ChangeLog

+Fri Oct  9 13:01:23 1998  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
+
+	* ch-tree.h (build_delay_case_end): Remove unused parameter.
+	(build_receive_case_end): Likewise.
+	(check_queue_size): Likewise.
+
+	* parse.c: Callers changed.
+
+	* satisfy.c: Likewise.
+
+	* tasking.c (build_receive_buffer_case_end): Remove unused
+	parameter `label_cnt'.
+	(build_receive_signal_case_end): Likewise.
+	(build_receive_case_end): Likewise.
+	(build_delay_case_end): Likewise.
+	(check_queue_size): Likewise for parameter `type'.
+	All callers changed.
+
 Thu Oct  8 05:57:41 1998  Jeffrey A Law  (law@cygnus.com)
 
 	* typeck (type_for_mode): Only return TItype nodes when

gcc/ch/ch-tree.h

@@ -1038,10 +1038,10 @@ extern tree build_buffer_descriptor             PROTO((tree, tree, tree));
 extern tree build_buffer_type                   PROTO((tree, tree));
 extern void build_delay_action                  PROTO((tree, tree));
 extern tree build_delay_case_start              PROTO((tree, tree));
-extern void build_delay_case_end                PROTO((tree, tree));
+extern void build_delay_case_end                PROTO((tree));
 extern void build_delay_case_label              PROTO((tree, int));
 extern tree build_event_type                    PROTO((tree));
-extern void build_receive_case_end              PROTO((tree, tree, tree));
+extern void build_receive_case_end              PROTO((tree, tree));
 extern int  build_receive_case_if_generated     PROTO((void));
 extern tree build_receive_case_label            PROTO((tree, tree));
 extern tree build_receive_case_start            PROTO((tree));
@@ -1062,7 +1062,7 @@ extern tree build_signal_descriptor             PROTO((tree, tree));
 extern tree build_signal_struct_type            PROTO((tree, tree, tree));
 extern tree build_tasking_struct                PROTO((void));
 extern tree chill_taskingcode_type_node;
-extern tree check_queue_size                    PROTO((tree, tree));
+extern tree check_queue_size                    PROTO((tree));
 extern tree generate_tasking_code_variable      PROTO((tree, tree *, int));
 extern tree get_signal_type_name                PROTO((tree));
 extern tree get_struct_type_name                PROTO((tree));

gcc/ch/parse.c

@@ -2205,7 +2205,7 @@ parse_delay_case_action (label)
     }
   expect (ESAC, "missing 'ESAC' in DELAY CASE'");
   if (! ignoring)
-    build_delay_case_end (label_cnt, combined_event_list);
+    build_delay_case_end (combined_event_list);
   possibly_define_exit_label (label);
   poplevel (0, 0, 0); 
 }
@@ -2436,8 +2436,7 @@ parse_receive_case_action (label)
   expect (ESAC, "missing 'ESAC' matching 'RECEIVE CASE'");
   if (! ignoring)
     {
-      build_receive_case_end (instance_location, nreverse (alt_list),
-			      have_else_actions);
+      build_receive_case_end (nreverse (alt_list), have_else_actions);
     }
   possibly_define_exit_label (label);
   poplevel (0, 0, 0); 

gcc/ch/satisfy.c

@@ -560,7 +560,7 @@ satisfy (exp, chain)
 		      {
 			if (CH_IS_BUFFER_MODE (exp) || CH_IS_EVENT_MODE (exp))
 			  DECL_INITIAL (decl)
-			    = check_queue_size (exp, DECL_INITIAL (decl));
+			    = check_queue_size (DECL_INITIAL (decl));
 			else if (CH_IS_TEXT_MODE (exp) &&
 				 DECL_NAME (decl) == get_identifier ("__textlength"))
 			  DECL_INITIAL (decl)

gcc/ch/tasking.c

@@ -2085,8 +2085,8 @@ build_receive_case_label (signame, loclist)
  * BUFFER location and TREE_PURPOSE defines the defining occurence.
  */
 static void
-build_receive_buffer_case_end (label_cnt, buf_list, else_clause)
-     tree label_cnt, buf_list, else_clause;
+build_receive_buffer_case_end (buf_list, else_clause)
+     tree buf_list, else_clause;
 {
   struct rc_state_type *rc_state = current_rc_state;
   tree alist;
@@ -2185,8 +2185,8 @@ build_receive_buffer_case_end (label_cnt, buf_list, else_clause)
  * case-label counter passed from build_receive_case_start.
  */
 static void
-build_receive_signal_case_end (label_cnt, sig_list, else_clause)
-     tree label_cnt, sig_list, else_clause;
+build_receive_signal_case_end (sig_list, else_clause)
+     tree sig_list, else_clause;
 {
   struct rc_state_type *rc_state = current_rc_state;
   tree alist, temp1;
@@ -2285,8 +2285,8 @@ build_receive_signal_case_end (label_cnt, sig_list, else_clause)
 /* General function for the end of a RECEIVE CASE action */
 
 void
-build_receive_case_end (label_cnt, alist, else_clause)
-     tree label_cnt, alist, else_clause;
+build_receive_case_end (alist, else_clause)
+     tree alist, else_clause;
 {
   rtx rcdone = gen_label_rtx ();
   struct rc_state_type *rc_state = current_rc_state;
@@ -2322,9 +2322,9 @@ build_receive_case_end (label_cnt, alist, else_clause)
 
   /* now call the actual end function */
   if (rc_state->bufseen)
-    build_receive_buffer_case_end (label_cnt, alist, else_clause);
+    build_receive_buffer_case_end (alist, else_clause);
   else
-    build_receive_signal_case_end (label_cnt, alist, else_clause);
+    build_receive_signal_case_end (alist, else_clause);
 
   /* now jump to the beginning of RECEIVE CASE processing */
 gen_rcdoit: ;
@@ -2594,8 +2594,8 @@ build_delay_case_label (eventlist, if_or_elseif)
  * passed from build_delay_case_start.
  */
 void
-build_delay_case_end (label_cnt, event_list)
-     tree label_cnt, event_list;
+build_delay_case_end (event_list)
+     tree event_list;
 {
   struct dl_state_type *dl_state = current_dl_state;
   rtx    dldone          = gen_label_rtx ();
@@ -3209,8 +3209,8 @@ invalidate_buffer_element_mode (bufmode)
    perform various error checks.  Return a new queue size. */
 
 tree
-check_queue_size (type, qsize)
-     tree type, qsize;
+check_queue_size (qsize)
+     tree qsize;
 {
   if (qsize == NULL_TREE || TREE_CODE (qsize) == ERROR_MARK)
     return qsize;