From: Bryce McKinlay <bryce@waitaki.otago.ac.nz>
Date: Fri, 9 Aug 2002 03:52:23 +0000 (+0000)
Subject: jcf-write.c (get_access_flags): Return correct access flags for private and protected... 
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=097684ce62b505168739fc98e952f92a8719a1fa;p=gcc.git

jcf-write.c (get_access_flags): Return correct access flags for private and protected inner classes.

2002-08-08  Bryce McKinlay  <bryce@waitaki.otago.ac.nz>

       * jcf-write.c (get_access_flags): Return correct access flags for
       private and protected inner classes.

From-SVN: r56146
---

diff --git a/gcc/java/ChangeLog b/gcc/java/ChangeLog
index d413096b2ec..28038889b8c 100644
--- a/gcc/java/ChangeLog
+++ b/gcc/java/ChangeLog
@@ -1,3 +1,8 @@
+2002-08-08  Bryce McKinlay  <bryce@waitaki.otago.ac.nz>
+
+	* jcf-write.c (get_access_flags): Return correct access flags for 
+	private and protected inner classes.
+
 2002-08-08  Nathan Sidwell  <nathan@codesourcery.com>
 
 	* java/Make-lang.in (java.mostlyclean): Remove coverage files.
diff --git a/gcc/java/jcf-write.c b/gcc/java/jcf-write.c
index dcf2397a9ec..076912505e5 100644
--- a/gcc/java/jcf-write.c
+++ b/gcc/java/jcf-write.c
@@ -683,6 +683,10 @@ get_access_flags (decl)
 	flags |= ACC_INTERFACE;
       if (CLASS_STATIC (decl))
 	flags |= ACC_STATIC;
+      if (CLASS_PRIVATE (decl))
+	flags |= ACC_PRIVATE;
+      if (CLASS_PROTECTED (decl))
+	flags |= ACC_PROTECTED;
       if (ANONYMOUS_CLASS_P (TREE_TYPE (decl))
 	  || LOCAL_CLASS_P (TREE_TYPE (decl)))
 	flags |= ACC_PRIVATE;