PR fortran/95090 - ICE: identifier overflow

[thirdparty/gcc.git] / gcc / gimple.c

diff --git a/gcc/gimple.c b/gcc/gimple.c
index 92c6e6425897c06f33c83795b10207cd92dfd15c..10c562f4deffdd7237be2663aefb1594c1a8c426 100644 (file)
--- a/gcc/gimple.c
+++ b/gcc/gimple.c
@@ -2730,15 +2730,15 @@ gimple_builtin_call_types_compatible_p (const gimple *stmt, tree fndecl)
   return true;
 }
 
-/* Return true when STMT is operator delete call.  */
+/* Return true when STMT is operator a replaceable delete call.  */
 
 bool
-gimple_call_operator_delete_p (const gcall *stmt)
+gimple_call_replaceable_operator_delete_p (const gcall *stmt)
 {
   tree fndecl;
 
   if ((fndecl = gimple_call_fndecl (stmt)) != NULL_TREE)
-    return DECL_IS_OPERATOR_DELETE_P (fndecl);
+    return DECL_IS_REPLACEABLE_OPERATOR_DELETE_P (fndecl);
   return false;
 }
 
@@ -3289,7 +3289,7 @@ gimple_inexpensive_call_p (gcall *stmt)
    location information, get the location from EXPR.  */
 
 location_t
-gimple_or_expr_nonartificial_location (gimple *stmt, tree)
+gimple_or_expr_nonartificial_location (gimple *stmt, tree expr)
 {
   location_t loc = gimple_nonartificial_location (stmt);
   if (loc == UNKNOWN_LOCATION && EXPR_HAS_LOCATION (expr))