diff options
| author | Marcelo Matus <mmatus@acms.arizona.edu> | 2005-12-23 00:07:49 +0000 |
|---|---|---|
| committer | Marcelo Matus <mmatus@acms.arizona.edu> | 2005-12-23 00:07:49 +0000 |
| commit | c0da62d12865542f4e625e0aec10a538ddc82c28 (patch) | |
| tree | 8a9554f5209d060d907a2b1192d3aed042d3b01d /Source/Modules/perl5.cxx | |
| parent | ae09b70a40bc87a1c1aff654bcca8695cda129e4 (diff) | |
| download | swig-c0da62d12865542f4e625e0aec10a538ddc82c28.tar.gz | |
implement the rank-cast dispatch mechanism, which is now the default behavior in perl
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8045 626c5289-ae23-0410-ae9c-e8d60b6d4f22
Diffstat (limited to 'Source/Modules/perl5.cxx')
| -rw-r--r-- | Source/Modules/perl5.cxx | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Source/Modules/perl5.cxx b/Source/Modules/perl5.cxx index b70c98b33..743dc02f3 100644 --- a/Source/Modules/perl5.cxx +++ b/Source/Modules/perl5.cxx @@ -747,7 +747,7 @@ public: } else if (!Getattr(n,"sym:nextSibling")) { /* Generate overloaded dispatch function */ int maxargs, ii; - String *dispatch = Swig_overload_dispatch(n,"(*PL_markstack_ptr++);SWIG_CALLXS(%s); return;",&maxargs); + String *dispatch = Swig_overload_dispatch_cast(n,"(*PL_markstack_ptr++);SWIG_CALLXS(%s); return;",&maxargs); /* Generate a dispatch wrapper for all overloaded functions */ |