minor 'const' consistence fix
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@6762 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
899c08b740
commit
46caa599e9
3 changed files with 4 additions and 4 deletions
|
|
@ -321,7 +321,7 @@ static void
|
|||
static int
|
||||
SWIG_Perl_ConvertPacked(SWIG_MAYBE_PERL_OBJECT SV *obj, void *ptr, int sz, swig_type_info *ty, int flags) {
|
||||
swig_type_info *tc;
|
||||
char *c = 0;
|
||||
const char *c = 0;
|
||||
|
||||
if ((!obj) || (!SvOK(obj))) return -1;
|
||||
c = SvPV(obj, PL_na);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue