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:
parent
9db86ad87f
commit
c583dcc5f9
1 changed files with 0 additions and 3 deletions
|
|
@ -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);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue