This is an automatically generated mail to inform you that tests are now
available in t/spec/S06-signature/defaults.t
commit cef0417fff18aebc1c6e25c16549e78fe0773aa4
Author: bbkr <b...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Fri Jul 30 17:37:14 2010 +0000
[t/spec] tests for RT #69200 Param typed with Bool doesnt accept :foo-type
argument in Rakudo
git-svn-id: http://svn.pugscode.org/p...@31875
c213334d-75ef-0310-aa23-eaa082d1ae64
diff --git a/t/spec/S06-signature/defaults.t b/t/spec/S06-signature/defaults.t
index d83d80c..5bd88a5 100644
--- a/t/spec/S06-signature/defaults.t
+++ b/t/spec/S06-signature/defaults.t
@@ -10,7 +10,7 @@ Tests assigning default values to variables of type code in
sub definitions.
# L<S06/Optional parameters/Default values can be calculated at run-time>
-plan 4;
+plan 5;
sub doubler($x) { return 2 * $x }
@@ -41,4 +41,10 @@ ok((MyPack::val_v), "default sub called in package
namespace");
is default_with_list(), 1, 'can have a parcel literal as default value';
}
+# RT #69200
+{
+ sub rt69200(Bool :$x) { $x };
+ is rt69200(:x), True, '":x" is the same as "x => True" in sub call';
+}
+
# vim: ft=perl6
