Fix a few bugs in the chicken module

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@7073 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
John Lenz 2005-03-15 23:02:58 +00:00
commit 99db8b33b2
3 changed files with 30 additions and 11 deletions

View file

@ -238,6 +238,10 @@ CHICKEN::top(Node *n)
Printf(f_init, "C_kontinue (continuation, ret);\n");
Printf(f_init, "}\n\n");
Printf(f_init,"#ifdef __cplusplus\n");
Printf(f_init,"}\n");
Printf(f_init,"#endif\n");
Printf(chicken_filename,"%s%s.scm", SWIG_output_directory(), module);
if ((f_scm = NewFile(chicken_filename,"w")) == 0) {
Printf(stderr,"Unable to open %s\n", chicken_filename);