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

Slight tweak to parse() method.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@275 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Dave Beazley 2000-02-26 20:35:55 +00:00
commit ae7fb643c2
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Source/Modules1.1/perl5.cxx
View file

@ -214,7 +214,7 @@ PERL5::parse() {
// Run the parser // Run the parser
yyparse(); yyparse();
fputs(vinit.get(),f_wrappers);
} }
@ -508,6 +508,7 @@ void PERL5::close(void)
vinit << tab4 << "XSRETURN(1);\n" vinit << tab4 << "XSRETURN(1);\n"
<< "}\n"; << "}\n";
fputs(vinit.get(),f_wrappers);
fprintf(f_pm,"package %s;\n", package); fprintf(f_pm,"package %s;\n", package);
if (!is_static) { if (!is_static) {