Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

prefix ?^

  • Loading branch information...
commit 1fa68840ddb6babacbe05911db33cb664fbf0541 1 parent 5d0290d
Moritz Lenz moritz authored
Showing with 4 additions and 1 deletion.
  1. +4 −1 S03-operators/boolean-bitwise.t
5 S03-operators/boolean-bitwise.t
View
@@ -7,7 +7,7 @@ use Test;
Tests for Synopsis 3
=end kwid
-plan 43;
+plan 45;
{ # L<S03/Changes to Perl 5 operators/ "?| is a logical OR">
# work with pure Bool's
@@ -99,3 +99,6 @@ plan 43;
#?pugs skip 'No compatible multi variant found: "&infix:?^"'
isa_ok infix:<?^>(), Bool, '?^ with no arguments yields a Bool';
}
+
+ok (?^5) === False, 'prefix ?^ (+)';
+ok (?^0) === True, 'prefix ?^ (-)';
Please sign in to comment.
Something went wrong with that request. Please try again.