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

Chicken: Fix bug when exporting non-class variables using -proxy

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@6865 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
John Lenz 2004-12-12 21:50:42 +00:00
commit 950ecdc961
1 changed files with 1 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Source/Modules/chicken.cxx
View file

@ -735,11 +735,8 @@ CHICKEN::variableWrapper(Node *n) {
if (!in_class) { if (!in_class) {
String *class_name = SwigType_typedef_resolve_all(SwigType_base(t)); String *class_name = SwigType_typedef_resolve_all(SwigType_base(t));
String *clos_name = chickenNameMapping(scmname, (char *)""); String *clos_name = chickenNameMapping(scmname, (char *)"");
String *primitive_name = NewString("");
Printv(primitive_name, scmname, NIL);
/* Simply re-export the procedure */ /* Simply re-export the procedure */
Printv(closcode, "(define ", clos_name, " ", primitive_name, ")\n", NIL); Printv(closcode, "(define ", clos_name, " ", chickenPrimitiveName(scmname), ")\n", NIL);
Delete(primitive_name);
Delete(class_name); Delete(class_name);
Delete(clos_name); Delete(clos_name);
} }