diff options
Diffstat (limited to 'Lib/perl5/perlstrings.swg')
-rw-r--r-- | Lib/perl5/perlstrings.swg | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Lib/perl5/perlstrings.swg b/Lib/perl5/perlstrings.swg index 242a9c967..d21b75afb 100644 --- a/Lib/perl5/perlstrings.swg +++ b/Lib/perl5/perlstrings.swg @@ -15,7 +15,7 @@ SWIG_AsCharPtrAndSize(SV *obj, char** cptr, size_t* psize, int *alloc) STRLEN len = 0; char *cstr = SvPV(obj, len); size_t size = len + 1; - if (cptr) { + if (cptr) { if (alloc) { if (*alloc == SWIG_NEWOBJ) { *cptr = %new_copy_array(cstr, size, char); |