Took out cv=cv, items=items hack.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@822 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Dave Beazley 2000-09-04 00:46:02 +00:00
commit c583dcc5f9

View file

@ -283,7 +283,6 @@ PERL5::initialize()
Printf(f_init,"\t dXSARGS;\n");
Printf(f_init,"\t int i;\n");
Printf(f_init,"\t char *file = __FILE__;\n");
Printf(f_init,"\t cv = cv; items = items;\n");
Printv(f_init,
"for (i = 0; swig_types_initial[i]; i++) {\n",
"swig_types[i] = SWIG_TypeRegister(swig_types_initial[i]);\n",
@ -294,7 +293,6 @@ PERL5::initialize()
"XS(_wrap_perl5_", cmodule, "_var_init) {\n",
tab4, "dXSARGS;\n",
tab4, "SV *sv;\n",
tab4, "cv = cv; items = items;\n",
0);
Printf(f_pm,"# This file was automatically generated by SWIG\n");
@ -516,7 +514,6 @@ PERL5::create_function(char *name, char *iname, SwigType *d, ParmList *l)
outarg = NewString("");
Printv(f->def, "XS(", Swig_name_wrapper(iname), ") {\n", 0);
Printv(f->code, tab4, "cv = cv;\n", 0);
pcount = emit_args(d, l, f);
numopt = check_numopt(l);