[gcc r13-1765] Remove unused remove_node_from_expr_list

[gcc r13-1765] Remove unused remove_node_from_expr_list

[Alexander Monakov]

https://gcc.gnu.org/g:8694390e2b6ae3af3212f1c829e62fb086cf7707

commit r13-1765-g8694390e2b6ae3af3212f1c829e62fb086cf7707
Author: Alexander Monakov <amonakov@ispras.ru>
Date:   Tue Jul 19 18:01:37 2022 +0300

    Remove unused remove_node_from_expr_list
    
    This function remains unused since remove_node_from_insn_list was cloned
    from it.
    
    gcc/ChangeLog:
    
            * rtl.h (remove_node_from_expr_list): Remove declaration.
            * rtlanal.cc (remove_node_from_expr_list): Remove (no uses).

Diff:
---
 gcc/rtl.h      |  1 -
 gcc/rtlanal.cc | 29 -----------------------------
 2 files changed, 30 deletions(-)

diff --git a/gcc/rtl.h b/gcc/rtl.h
index 488016bb42a..645c009a340 100644
--- a/gcc/rtl.h
+++ b/gcc/rtl.h
@@ -3712,7 +3712,6 @@ extern unsigned hash_rtx_cb (const_rtx, machine_mode, int *, int *,
 extern rtx regno_use_in (unsigned int, rtx);
 extern int auto_inc_p (const_rtx);
 extern bool in_insn_list_p (const rtx_insn_list *, const rtx_insn *);
-extern void remove_node_from_expr_list (const_rtx, rtx_expr_list **);
 extern void remove_node_from_insn_list (const rtx_insn *, rtx_insn_list **);
 extern int loc_mentioned_in_p (rtx *, const_rtx);
 extern rtx_insn *find_first_parameter_load (rtx_insn *, rtx_insn *);
diff --git a/gcc/rtlanal.cc b/gcc/rtlanal.cc
index d78cc602400..ec95ecd6cf9 100644
--- a/gcc/rtlanal.cc
+++ b/gcc/rtlanal.cc
@@ -2878,35 +2878,6 @@ in_insn_list_p (const rtx_insn_list *listp, const rtx_insn *node)
   return false;
 }
 
-/* Search LISTP (an EXPR_LIST) for an entry whose first operand is NODE and
-   remove that entry from the list if it is found.
-
-   A simple equality test is used to determine if NODE matches.  */
-
-void
-remove_node_from_expr_list (const_rtx node, rtx_expr_list **listp)
-{
-  rtx_expr_list *temp = *listp;
-  rtx_expr_list *prev = NULL;
-
-  while (temp)
-    {
-      if (node == temp->element ())
-	{
-	  /* Splice the node out of the list.  */
-	  if (prev)
-	    XEXP (prev, 1) = temp->next ();
-	  else
-	    *listp = temp->next ();
-
-	  return;
-	}
-
-      prev = temp;
-      temp = temp->next ();
-    }
-}
-
 /* Search LISTP (an INSN_LIST) for an entry whose first operand is NODE and
    remove that entry from the list if it is found.