Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 18 lines (11 sloc) 0.388 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
use v6;

use Test;

plan 4;

# L<S03/Loose or precedence/"infix:<or>, short-circuit inclusive or">
# L<S02/Immutable types/"Perl boolean">

is (try { 42 or Bool::False }), 42, "Bool::False as RHS";
#?pugs todo 'parsing'
is (try { Bool::False or 42 }), 42, "Bool::False as LHS";

is (try { 42 or False }), 42, "False as RHS";
is (try { False or 42 }), 42, "False as LHS";

# vim: ft=perl6
Something went wrong with that request. Please try again.