summaryrefslogtreecommitdiffstats
path: root/MDK/Common/Func.pm
diff options
context:
space:
mode:
Diffstat (limited to 'MDK/Common/Func.pm')
-rw-r--r--MDK/Common/Func.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/MDK/Common/Func.pm b/MDK/Common/Func.pm
index e954a0b..eca3493 100644
--- a/MDK/Common/Func.pm
+++ b/MDK/Common/Func.pm
@@ -198,7 +198,7 @@ sub fold_left(&@) {
local ($::a, $::b);
$::a = $initial;
foreach (@l) { $::b = $_; $::a = &$f() }
- $::a
+ $::a;
}
sub smapn {
@@ -206,7 +206,7 @@ sub smapn {
my $n = shift;
my @r;
for (my $i = 0; $i < $n; $i++) { push @r, &$f(map { $_->[$i] } @_) }
- @r
+ @r;
}
sub mapn(&@) {
my $f = shift;
@@ -220,7 +220,7 @@ sub mapn_(&@) {
sub find(&@) {
my $f = shift;
$f->($_) and return $_ foreach @_;
- undef
+ undef;
}
sub any(&@) {
my $f = shift;