Skip to content


Subversion checkout URL

You can clone with
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

17 lines (11 sloc) 372 Bytes
use v6;
use Test;
plan 6;
# L<S32::Basics/Any/"=item cmp">
is('a' cmp 'a', Order::Same, 'a is equal to a');
is('a' cmp 'b', Order::Less, 'a is less than b');
is('b' cmp 'a', Order::More, 'b is greater than a');
is(3 cmp 3, Order::Same, '3 cmp 3 is 0');
is(2 cmp 3, Order::Less, '2 cmp 3 is -1');
is(3 cmp 4, Order::Less, '3 cmp 4 is -1');
# vim: ft=perl6
Jump to Line
Something went wrong with that request. Please try again.