+ new vis_none visibility specifier that can be used as "neutral"

  * make it possible to force the visibility of added constructors
    in add_missing_parent_constructors_intf() to a particular
    setting (use vis_none to keep the visibility of the inherited
    constructor)

git-svn-id: http://svn.freepascal.org/svn/fpc/branches/jvmbackend@18614 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 1 insertions, 1 deletions

diff --git a/compiler/pdecobj.pas b/compiler/pdecobj.pas
index 5a21b61989..c21b8688fe 100644
--- a/compiler/pdecobj.pas
+++ b/compiler/pdecobj.pas
@@ -1390,7 +1390,7 @@ implementation
                 we obviously cannot add constructors to those) }
               if is_javaclass(current_structdef) then
                 begin
-                  add_missing_parent_constructors_intf(tobjectdef(current_structdef));
+                  add_missing_parent_constructors_intf(tobjectdef(current_structdef),vis_none);
                   maybe_add_public_default_java_constructor(tobjectdef(current_structdef));
                 end;
               { need method to hold the initialization code for typed constants? }