1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/tree.c b/gcc/tree.c
index 25431d4..e0a1c46 100644
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -1856,6 +1856,10 @@ has_cleanups (tree exp)
 	}
       return 0;
 
+    case DECL_EXPR:
+      return (DECL_INITIAL (DECL_EXPR_DECL (exp))
+	      && has_cleanups (DECL_INITIAL (DECL_EXPR_DECL (exp))));
+
     default:
       break;
     }