Directors ignore private ctors

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@4988 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Mark Rose 2003-08-11 01:05:05 +00:00
commit e87d1bb79b
2 changed files with 11 additions and 2 deletions

View file

@ -1473,8 +1473,11 @@ int Language::classDirectorConstructors(Node *n) {
for (ni = Getattr(n, "firstChild"); ni; ni = nextSibling(ni)) {
nodeType = Getattr(ni, "nodeType");
if (!Cmp(nodeType, "constructor")) {
classDirectorConstructor(ni);
constructor = 1;
String* access = Getattr(ni, "access");
if (!access || !Cmp(access, "public")) {
classDirectorConstructor(ni);
constructor = 1;
}
}
}
if (!constructor) {