From 67eb34f20e39635062c508101f9c107006e94246 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Sat, 18 Aug 2012 21:04:41 -0500
Subject: couple more tests

---
 t/anon.t | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 't/anon.t')

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;
-- 
cgit v1.2.3-54-g00ecf