test that defined() is a listop, RT #76448

Raku · Mar 31, 2012 · eff0660 · eff0660
1 parent d36d5ce
commit eff0660
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/S32-scalar/defined.t b/S32-scalar/defined.t
@@ -1,6 +1,6 @@
 use v6;
 use Test;
-plan 54;
+plan 56;
 
 # L<S32::Basics/Mu/=item defined>
 
@@ -135,4 +135,8 @@ my %a = (a => 1);
 ok defined(%a{"a"}),        "defined on a hash with parens (1)";
 ok !defined(%a{"b"}),       "defined on a hash with parens (2)";
 
+# RT #76448
+ok defined('a' => 5) ~~ Bool, 'defined is a listop, not a prefix op';
+ok &defined, '&defined is available';
+
 # vim: ft=perl6