From b96fdc7b84eb288dea0c3e99a212e6483007a35a Mon Sep 17 00:00:00 2001
From: Thomas Koenig <tkoenig@gcc.gnu.org>
Date: Sun, 11 Oct 2020 17:30:41 +0200
Subject: Add initialization to orig_desc in gfc_deallocate_with_status.

gcc/fortran/ChangeLog:

	* trans.c (gfc_deallocate_with_status): Add initialization to
          orig_desc.
---
 gcc/fortran/trans.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'gcc')

diff --git a/gcc/fortran/trans.c b/gcc/fortran/trans.c
index 1bd9801..7d9cd32 100644
--- a/gcc/fortran/trans.c
+++ b/gcc/fortran/trans.c
@@ -1352,7 +1352,7 @@ gfc_deallocate_with_status (tree pointer, tree status, tree errmsg,
   tree cond, tmp, error;
   tree status_type = NULL_TREE;
   tree token = NULL_TREE;
-  tree orig_desc;
+  tree orig_desc = NULL_TREE;
   gfc_coarray_deregtype caf_dereg_type = GFC_CAF_COARRAY_DEREGISTER;
 
   if (coarray_dealloc_mode >= GFC_CAF_COARRAY_ANALYZE )
-- 
cgit v1.1