Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[t/spec] Pair.invert

git-svn-id: http://svn.pugscode.org/pugs@31341 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
commit eac07e0df648a245bbd1b10ebcd02ebb67e2c8d7 1 parent d8740b6
moritz authored
Showing with 7 additions and 1 deletion.
  1. +7 −1 S02-builtin_data_types/pair.t
View
8 S02-builtin_data_types/pair.t
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 114;
+plan 117;
# L<S02/Mutable types/A single key-to-value association>
# basic Pair
@@ -359,4 +359,10 @@ Note, "non-chaining binary" was later renamed to "structural infix".
lives_ok { (a => []) }, 'can execute "(a => [])"';
}
+{
+ is (a => 3).invert.key, 3, 'Pair.invert.key';
+ isa_ok (a => 3).invert.key, Int, 'Pair.invert.key type';
+ is (a => 3).invert.value, 'a', 'Pair.invert.value';
+}
+
# vim: ft=perl6
Please sign in to comment.
Something went wrong with that request. Please try again.