Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 21 lines (15 sloc) 0.518 kb
21f2f52 [t] move tests for spaceship operator to spec/
moritz authored
1 use v6;
2
3 use Test;
4
5 plan 6;
6 #L<S03/Comparison semantics/The <=> operator>
7
8 my %h = ("a" => 1, "b" => 2);
9 ok(%h{"a"} < %h{"b"}, 'comparing hash values');
10 ok(%h{"a"} <= %h{"b"}, 'comparing hash values');
28ef8dc @coke pugs fudges
coke authored
11 #?pugs skip 'Order::Increase'
bb7b418 @jnthn Final (hopefully!) batch of Order updates.
jnthn authored
12 is(%h{"a"} <=> %h{"b"}, Order::Increase, 'comparing hash values');
21f2f52 [t] move tests for spaceship operator to spec/
moritz authored
13
14 my @a = (1, 2);
15 ok(@a[0] < @a[1], 'comparing array values');
16 ok(@a[0] <= @a[1], 'comparing array values');
28ef8dc @coke pugs fudges
coke authored
17 #?pugs skip 'Order::Increase'
bb7b418 @jnthn Final (hopefully!) batch of Order updates.
jnthn authored
18 is(@a[0] <=> @a[1], Order::Increase, 'comparing array values');
7f29bc5 [t/spec] Add vim: lines everywhere.
kyle authored
19
20 # vim: ft=perl6
Something went wrong with that request. Please try again.