diff options
Diffstat (limited to 'universal.c')
-rw-r--r-- | universal.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/universal.c b/universal.c index 3bba77da18..9b032bdfaf 100644 --- a/universal.c +++ b/universal.c @@ -956,10 +956,10 @@ XS(XS_re_regnames) XSRETURN_UNDEF; av = MUTABLE_AV(SvRV(ret)); - length = av_tindex(av); + length = av_count(av); - EXTEND(SP, length+1); /* better extend stack just once */ - for (i = 0; i <= length; i++) { + EXTEND(SP, length); /* better extend stack just once */ + for (i = 0; i < length; i++) { entry = av_fetch(av, i, FALSE); if (!entry) |