Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Tag: v4.0
Fetching contributors…

Cannot retrieve contributors at this time

executable file 26 lines (20 sloc) 0.316 kB
use v6;
class Obj {
has $.x;
has $.y;
}
class Main {
say '1..2';
my $x := 0;
my $y := 0;
my $obj := ::Obj( x => 1, y => 2 );
::Obj( :$x, :$y ) := $obj;
if $x != 1 {
print 'not '
};
say 'ok ', $x;
if $y != 2 {
print 'not '
};
say 'ok ', $y;
}
Jump to Line
Something went wrong with that request. Please try again.