jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add support for template_extmode, ie, the emitonlychildren feature

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@6804 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2004-12-01 00:50:06 +00:00
commit 8c2bc267b8
3 changed files with 30 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

9
SWIG/Source/Modules/perl5.cxx
View file

@ -1071,10 +1071,13 @@ public:
* ------------------------------------------------------------ */
virtual int classDeclaration(Node *n) {
/* Do some work on the class name */
if (blessed) {
setclassname(n);
Append(classlist,n);
if (!Getattr(n,"feature:onlychildren")) {
if (blessed) {
setclassname(n);
Append(classlist,n);
}
}
return Language::classDeclaration(n);
}

7
SWIG/Source/Modules/php4.cxx
View file

@ -1405,8 +1405,11 @@ public:
* ------------------------------------------------------------ */
virtual int classDeclaration(Node *n) {
String *symname = Getattr(n,"sym:name");
Setattr(n,"php:proxy",symname);
if (!Getattr(n,"feature:onlychildren")) {
String *symname = Getattr(n,"sym:name");
Setattr(n,"php:proxy",symname);
}
return Language::classDeclaration(n);
}

36
SWIG/Source/Modules/ruby.cxx
View file

@ -1439,7 +1439,7 @@ public:
}
Swig_warning(WARN_RUBY_WRONG_NAME, input_file, line_number,
"Wrong %s name\n", reason);
"Wrong %s name %s\n", reason, name);
return name;
}
@ -1505,22 +1505,24 @@ public:
* ----------------------------------------------------------------------------- */
virtual int classDeclaration(Node *n) {
String *name = Getattr(n,"name");
String *symname = Getattr(n,"sym:name");
String *tdname = Getattr(n,"tdname");
name = tdname ? tdname : name;
String *namestr = SwigType_namestr(name);
klass = RCLASS(classes, Char(namestr));
if (!klass) {
klass = new RClass();
String *valid_name = NewString(symname ? symname : namestr);
validate_const_name(Char(valid_name), "class");
klass->set_name(namestr, symname, valid_name);
SET_RCLASS(classes, Char(namestr), klass);
Delete(valid_name);
}
Delete(namestr);
if (!Getattr(n,"feature:onlychildren")) {
String *name = Getattr(n,"name");
String *symname = Getattr(n,"sym:name");
String *tdname = Getattr(n,"tdname");
name = tdname ? tdname : name;
String *namestr = SwigType_namestr(name);
klass = RCLASS(classes, Char(namestr));
if (!klass) {
klass = new RClass();
String *valid_name = NewString(symname ? symname : namestr);
validate_const_name(Char(valid_name), "class");
klass->set_name(namestr, symname, valid_name);
SET_RCLASS(classes, Char(namestr), klass);
Delete(valid_name);
}
Delete(namestr);
}
return Language::classDeclaration(n);
}