From: fengwang <fengwang@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Tue, 15 Mar 2005 03:26:09 +0000 (+0000)
Subject: 2005-03-15  Feng Wang  <fengwang@nudt.edu.cn>
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=60c4d030e28c4be3b518018ba818299730217168;p=thirdparty%2Fgcc.git

2005-03-15  Feng Wang  <fengwang@nudt.edu.cn>

	* trans-stmt.c (gfc_trans_label_assign): Don't set DECL_ARTIFICIAL flag
        to zero on label_tree.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96468 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 415af9def1d3..32e6c02b0c47 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2005-03-15  Feng Wang  <fengwang@nudt.edu.cn>
+
+	* trans-stmt.c (gfc_trans_label_assign): Don't set DECL_ARTIFICIAL flag
+	to zero on label_tree.
+
 2005-03-15  Feng Wang  <fengwang@nudt.edu.cn>
 
 	PR fortran/18827
diff --git a/gcc/fortran/trans-stmt.c b/gcc/fortran/trans-stmt.c
index ea5da88fe7b9..524412725ab6 100644
--- a/gcc/fortran/trans-stmt.c
+++ b/gcc/fortran/trans-stmt.c
@@ -120,8 +120,6 @@ gfc_trans_label_assign (gfc_code * code)
 
   if (code->label->defined == ST_LABEL_TARGET)
     {
-      /* Shouldn't need to set this flag. Reserve for optimization bug.  */
-      DECL_ARTIFICIAL (label_tree) = 0;
       label_tree = gfc_build_addr_expr (pvoid_type_node, label_tree);
       len_tree = integer_minus_one_node;
     }