Skip to content


Subversion checkout URL

You can clone with
Download ZIP
Fetching contributors…
Cannot retrieve contributors at this time
19 lines (14 sloc) 546 Bytes
use v6;
use Test;
plan 7;
is &infix:<+>(3, 8), 11, 'Can refer to &infix:<+>';
is infix:<+>(3, 8), 11, 'Can refer to infix:<+>';
is &infix:<->(3, 8), -5, 'Can refer to &infix:<->';
is infix:<->(3, 8), -5, 'Can refer to infix:<->';
#?pugs skip 'Order::Increase'
is &infix:<cmp>(3, 4), Order::Increase, 'Can refer to &infix:<cmp>';
#?niecza todo
#?pugs 2 skip 'no compatiable multi ok'
ok ~&infix:<+> ~~ /infix/, 'String value of &infix:<+> contains "infix"';
#?niecza todo
ok ~&infix:<+> ~~ /\+/, 'String value of &infix:<+> contains "+"';
Jump to Line
Something went wrong with that request. Please try again.