Branch: refs/heads/blead
Home: https://github.com/Perl/perl5
Commit: 3bbe14f5ab0067b7ce4357aaa1fc3ecfc48afac6
https://github.com/Perl/perl5/commit/3bbe14f5ab0067b7ce4357aaa1fc3ecfc48afac6
Author: Richard Leach <[email protected]>
Date: 2023-01-13 (Fri, 13 Jan 2023)
Changed paths:
M t/test.pl
Log Message:
-----------
t/test.pl - assign caller() to separate vars in _where()
_where() is a heavily used, small subroutine within test.pl. It currently
assigns all eleven of caller()'s return values to array elements, then
uses only the second and third of these to construct a return string.
This commit changes the assignment to use separate variables, which ends
up being more efficient.
Benchmarking suggests that _where() is about 30% faster as a result.
The overhead of ok( ... ) calls is reduced by about 10%.
