diff options
author | Karl Williamson <public@khwilliamson.com> | 2014-02-20 10:28:58 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2014-02-20 11:47:05 -0700 |
commit | b9f2b68390014b991c227e8c56d3e813584245b9 (patch) | |
tree | cda819a22dfe1ff503439d761b579ba313a4754c /ext/XS-Typemap | |
parent | 78ae08632cb098bf2ca76b516ad9ac6d22705ae7 (diff) | |
download | perl-b9f2b68390014b991c227e8c56d3e813584245b9.tar.gz |
Change av_len calls to av_tindex for clarity
av_tindex is a more clearly named synonym for av_len, available starting
in v5.18. This changes the core uses to it, including modules in /ext,
which are not dual-lifed.
Diffstat (limited to 'ext/XS-Typemap')
-rw-r--r-- | ext/XS-Typemap/Typemap.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/XS-Typemap/Typemap.xs b/ext/XS-Typemap/Typemap.xs index 0eb68e54ee..3fa0e74abc 100644 --- a/ext/XS-Typemap/Typemap.xs +++ b/ext/XS-Typemap/Typemap.xs @@ -157,7 +157,7 @@ XS_unpack_anotherstructPtrPtr(SV *in) else Perl_croak(aTHX_ "Argument is not an ARRAY reference"); - nitems = av_len(inary) + 1; + nitems = av_tindex(inary) + 1; /* FIXME dunno if supposed to use perl mallocs here */ /* N+1 elements so we know the last one is NULL */ |