summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--t/anon.t4
-rw-r--r--t/recursion.t2
2 files changed, 6 insertions, 0 deletions
diff --git a/t/anon.t b/t/anon.t
index 844fb97..059aa57 100644
--- a/t/anon.t
+++ b/t/anon.t
@@ -9,4 +9,8 @@ my $fun = fun ($x, $y) { $x * $y };
is($fun->(3, 4), 12);
+my $fun2 = fun ($z, $w = 10) { $z / $w };
+
+is($fun2->(60), 6);
+
done_testing;
diff --git a/t/recursion.t b/t/recursion.t
index 0b13da9..5c3c29b 100644
--- a/t/recursion.t
+++ b/t/recursion.t
@@ -22,4 +22,6 @@ fun fact ($n) {
is(fact(5), 120);
+is(fun ($n = 8) { $n < 2 ? 1 : $n * __SUB__->($n - 1) }->(), 40320);
+
done_testing;