summaryrefslogtreecommitdiff
path: root/ext/List/Util/t/reduce.t
diff options
context:
space:
mode:
Diffstat (limited to 'ext/List/Util/t/reduce.t')
-rwxr-xr-xext/List/Util/t/reduce.t1
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/List/Util/t/reduce.t b/ext/List/Util/t/reduce.t
index 786aaffea6..d82580de6e 100755
--- a/ext/List/Util/t/reduce.t
+++ b/ext/List/Util/t/reduce.t
@@ -127,6 +127,7 @@ SKIP: {
# (and more flexibly) in a way that we can't emulate from XS.
if (!$::PERL_ONLY) { SKIP: {
+ $List::Util::REAL_MULTICALL ||= 0; # Avoid use only once
skip("Poor man's MULTICALL can't cope", 2)
if !$List::Util::REAL_MULTICALL;