This is an automatically generated mail to inform you that tests are now
available in at least one of these files: misc/helpnow/README,
t/spec/S06-advanced_subroutine_features/return.t
commit d98dc61c3112db38ac492c0df797d66e735d43da
Author: moritz <mor...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Sat May 15 13:29:29 2010 +0000
[t/spec] tests for RT #75118, named arguments to return()
git-svn-id: http://svn.pugscode.org/p...@30644
c213334d-75ef-0310-aa23-eaa082d1ae64
diff --git a/misc/helpnow/README b/misc/helpnow/README
index f2714ea..882e333 100644
--- a/misc/helpnow/README
+++ b/misc/helpnow/README
@@ -21,6 +21,8 @@ Perl 6 that's achievable for a newcomer.
Port a smallish module
- Log::Message
+ - Text::Wrap
+ - Text::Soundex (but wait until Str.trans is implemented)
Implement $smallish_feature in $implementation
diff --git a/t/spec/S06-advanced_subroutine_features/return.t
b/t/spec/S06-advanced_subroutine_features/return.t
index 4fe6797..ead6cb8 100644
--- a/t/spec/S06-advanced_subroutine_features/return.t
+++ b/t/spec/S06-advanced_subroutine_features/return.t
@@ -15,7 +15,7 @@ See also t/blocks/return.t, which overlaps in scope.
# reference for the spec for 'return', but I couldn't find
# one either.
-plan 73;
+plan 76;
# These test the returning of values from a subroutine.
# We test each data-type with 4 different styles of return.
@@ -300,6 +300,17 @@ is Foo.new.officialsubmeth(), 43,
is Foo::official(), 44,
"return correctly from official sub only";
+# RT #75118
+{
+ sub named() {
+ return 1, 2, :c(3);
+ }
+ is named().elems, 3, 'return with named arguments';
+ is named().[2].key, 'c', ' ... correct key';
+ #?rakudo todo 'named argument to return()'
+ is named().[2].value, '3', ' ... correct value';
+}
+
# RT #61732
{
sub rt61732_c { 1; CATCH {} }
